AlignMode （讀寫）
語法AlignMode As Long
說明對齊方式（與 SAlign 屬性聯動）當控件的 長寬比例與影片不一致且 WMode 不為 ExactFit 時影片（沒有被放大的）在控件中顯示的位置可用該屬性調整 該屬性值由標志位組成如圖將該屬性值（二進制）中相 應的位標記為 就設置了相應的對齊方向
屬性值與相應的對齊方式（後面括號裡是二進制數）
左對齊() 右對齊() 頂對齊 () 底對齊()
也可以組合各種對齊方式同時將兩個或以上的位標 記為 也就是將這四個基本值組合相加比如同時左對齊 和頂對齊屬性值則設為 （）
例子 設置影片為右對齊
movieAlignMode =
BackgroundColor（讀寫） 語法BackgroundColor As Long 說明影片的背景色（與 BGColor 聯動）以（紅× ＋綠× ＋藍）計算顏色值紅綠藍顏色取 值范圍（ ）默認的影片背景色為 如果影片 設置了底色或有圖片當作背景那麼看不出來該屬性值的 改變會有什麼影響
例子將影片背景色設為藍色
movieBackgroundColor =
Base （讀寫）
語法Base As String
說明指定用於解決影片中所有相對路徑的聲明的基地址當影片與其需要的其他文件不在同一目錄中的時候該 屬性特別有用如不特別指定Base 的值默認為 也就 是當前影片所在的路徑
例子
movieBase = Http:///pathname/
pathname
BGColor （讀寫）
語法BGColor As String
說明影片的背景色（與 BackgroundColor 聯動）與 BackgroundColor 不同的是BGColor 是一個六位的十六進 制數每兩位分別代表紅綠藍顏色值如FFEEAA 表示 紅色值為 FF綠色值為 EE 藍色值為 AA
例子將影片背景色設為紅色
movieBGColor = FF
DeviceFont （讀寫）
語法DeviceFont As Boolean
說明 決定是否使用影片內嵌的字體 默認值為 False 將該屬性值設為 True 則強制播放器不使用影片中 內嵌的字體而使用本地系統字體
例子movieDeviceFont = True
EmbedMovie （讀寫）
語法EmbedMovie As Boolean
說明影片是否被存貯到控件所在的容器中當你已 載入一個影片後將該屬性設為 True 播放影片時就不必再 去讀 SWF 文件了這使得在 PowerPoint 簡報或 VB 程序 裡使用 Flash 影片更容易但將該屬性設為 True 後控 件的 Movie 屬性就不再接受新的值了要想播放另一個影 片（給 Movie 屬性賦新值）必須先將 EmbedMovie 屬 性設為 False
例子
movieEmbedMovie = True
FrameNum （讀寫）
語法FrameNum As Long
說明影片當前幀的編號 （從 開始計數 ）設置 該屬性值將使影片停在由 FrameNum 指定的幀處
例子 顯示當前幀數
MsgBox 當前顯示的是第 & movieFrameNum &
幀
使影片顯示第 幀 BomovieFrameNum =
Loop （讀寫）
語法Loop As Boolean
說明是否循環播放設為 True 是循環播放設為 False 則只播放一次
例子
movieLoop = True
Menu （讀寫）
語法Menu As Boolean
說明是否顯示菜單設為 True 顯示所有菜單設 為 False 菜單被屏蔽但仍有一項About Macromedia Flash Player如果你實在不喜歡這個菜單應該在程 序中通過攔截鼠標消息的方法來達到目的與在獨立的 F l a s h 播放器中不同的是 在控件的右鍵菜單裡點
About的話將打開浏覽器到 Macromedia 的網站上去 看 About 了
例子
movieMenu = False
Movie （讀寫）
語法Movie As String
說明要播放的影片路徑（URL ）設置該屬性為 一個 SWF 文件的 URL 將載入文件並播放它若影片是在 本地硬盤上要寫成從盤符開始的絕對路徑若影片是在某網站上也要寫全 URL 地址
例子
movieMovie = 或
movieMovie = c:\temp\testswf
Playing （只讀）
語法Playing As Boolean
說明當前播放狀態如果影片正在播放該屬性 值為 True 否則為 False
例子
If moviePlaying = False Then MsgBox 影片已停止播放！ End If
Quality （讀寫）
語法Quality As Long
說明畫面質量（與 Quality 聯動）Quality 可以取:
——相當於 Quality 取 Low
——相當於 Quality 取 High
——相當於 Quality 取 AutoLow
——相當於 Quality 取 AutoHigh 例子
movieQuality =
Quality（讀寫）
語法Quality As String
說明畫面質量(與 Quality 聯動)Quality 可以取: Low 偏重於播放速度而不管顯示效果而且不啟用消鋸齒功能
High 偏重於畫面而不管播放速度並且總是啟用 消鋸齒功能如果影片中不包含動畫就平滑處理位圖如 果有動畫那麼位圖就不被平滑處理（這裡的動畫應該 是把一張圖片做平移或旋轉）
AutoLow 先著重於播放速度但只要有可能就改 善顯示效果一開始播放時先禁用消鋸齒功能如果播放 器檢測到處理器能承受得了 就啟用消鋸齒功能
AutoHigh一開始是播放速度和顯示效果並重但 如有必要就犧牲畫質確保速度開始播放時就啟用消鋸齒 功能但如果實際的幀速率比設計時指定的速率慢了就 禁用消鋸齒功能來提高播放速度
例子
movieQuality = High
ReadyState（只讀）
語法ReadyState As Long
說明影片的當前狀態ReadyState 可以取
——正在載入
——未初始化
——已載入
——正在交互
——完成 例子
If movieReadyState = Then
MsgBox 影片載入完成！ End If
SAlign （讀寫）
語法SAlign As String
說明對齊模式（與 AlignMode 聯動）當 AlignMode
代表各對齊模式的位被置時SAlign 值也相應被設為
L（Left）T（Top）R（Right）B（Bottom）各字符的組合（LTRB的先後順序不變）
例子設置影片為左對齊和頂對齊
movieSAlign = LT
Scale （讀寫）
語法scale As String
說明縮放模式（與 ScaleMode 聯動）Scale 可以 取:
ShowAll ——在控件內顯示全部影片區域保持影片 長寬比例不變影片的大小決定於控件長或寬中較小的一 邊
NoBorder ——在控件內顯示部分影片區域保持影片 長寬比例不變影片的大小決定於控件長或寬中較大的一 邊
ExactFit ——在控件內顯示全部影片區域將影片的長 寬比例強制等於控件的長寬比例
例子
MsgBox 當前的縮放模式是 & movieScale
ScaleMode（讀寫）
語法ScaleMode As Long
說明縮放模式(與 Scale 聯動)ScaleMode 可以取
——相當於 Scale 取 ShowAll
——相當於 Scale 取 NoBorder
——相當於 Scale 取 ExactFit
例子使影片的縮放模式改成ExactFit
movieScaleMode =
Stacking （讀寫）
語法Stacking As String
說明用於 HTML將 Flash Player 當成 HTML 中 的一種行為使用時該屬性決定 Flash 影片相對於與其 參照的 HTML 內容如何顯示（有關行為請參閱樣式表 的資料）Stacking 可以取
none ——行為不顯示
replaceall ——行為的顯示取代全部其他元素的內 容 包括背景
content ——行為的顯示只取代其他元素的內 容
background ——行為的顯示只取代其他元素的背 景
below ——行為在所有其他元素內容的下面顯 示
belowflow ——行為以反向 Z 順序顯示在其他元素 的子對象之上 但在該元素主要內容之上
aboveflow ——行為以正向 Z 順序顯示在其他元素 的子對象之下 但在該元素主要內容之上
above ——行為顯示在所有其他元素的內容之上
top ——行為的顯示置於整個頁面內容之上 例子
movieStacking = below
TotalFrames（只讀）
語法TotalFrames As Long
說明返回影片中總幀數該參數要到影片載入完成 才有效（ReadyState=）
例子
If movieReadyState = Then
MsgBox 本影片共有 & movieTotalFrames & 幀
End If
WMode （讀寫）
語法WMode As String
說明控件的窗口模式WMode 可以取 Window —— WMode 屬性的默認值按 Flash 播放器
典型的方式工作即在控件的矩形窗口中播放影片這樣一 般都能提供最快的動畫效果
Opaque ——使影片不透明 Transparent ——創建一個透明的影片如果影片中有
透明的片段放到這裡時就可以看到控件下面的背景但 使用此屬性值動畫的播放速度可能會慢一些
例子
movieWMode = Transparent
方法:
Back
語法Back()
說明 影片後退一幀 並且停止播放 例子
movieBack
Forward
語法Forward()
說明 影片前進一幀 並且停止播放 例子
movieForward
GotoFrame
語法GotoFrame(FrameNum As Long) 說明將影片跳轉到由 FrameNum 指定的幀並且
停止播放如果所指定的幀還未載入播放器前進到最後 的可用幀並停下在調用過程中會產生無法預料的後果 最好使用 PercentLoaded 方法來確定是否已載入足夠的影片 來執行本方法參數 FrameNum 是從 開始的這和 Flash 中的 Goto 動作不一樣它是從 開始的
例子跳轉到影片的第 幀
movieGotoFrame
LoadMovie
語法LoadMovie(layer As Long url As String) 說明將由 url 指定的影片載入到由 layer 指定的層上 例子將 movieswf 載入至 層
movieLoadMovie movieswf
Pan
語法Pan(x As Long y As Long mode As Long) 說明將一個放大過的影片平移由 x 和 y 指定的距離
x 和 y 均為相對值即控件相對於影片來說平移的距離（你 可以想象控件是一個窗戶影片是我們從窗戶裡看到的放 在外面的布景 我們看到窗戶相對於布景平移了一些距離 那是外面的布景在動而窗戶是不動的）用 mode 參數 來指定 x 和 y 的值是像素還是窗口的百分比當 mode= 時 坐標系以像素為單位mode= 時坐標系就以窗口的百分 比來計算 平移並不能超出影片的邊框也就是說往 一個方向平移最多到達影片的邊緣與控件對齊的程度
例子控件相對於影片向左向上各平移 個像素（當 然控件不會動 是影片向右向下平移了 ）
moviePan
Play
語法:Play()
說明: 開始播放影片 例子:
moviePlay
Rewind
語法:Rewind()
說明: 倒帶返回到影片的第一幀 例子:
movieRewind
SetVariable
語法:SetVariable(name As String value As String) 說明:將由 name 指定的 Flash 變量值設為 value
例子:movieSetVariable /Form:UserName John Smith
SetZoomRect
語法:SetZoomRect(left As Long top As Long right
As Long bottom As Long)
說明: 將影片中指定的矩形區域放大到控件的大小 left(左)top(頂)right(右)bottom(底)的坐標值是相 對於控件中的影片有效位置計算的注意喲這個函數是 從影片的有效區域的左上角開始計算而不是控件的左上 角
例子放大影片中從左上角開始的 × 點的矩 形區域
pointsToTwips = ;
movieSetZoomRect * pointsToTwips
* pointsToTwips
Stop
語法Stop()
說明 停止播放影片 例子movieStop
StopPlay
語法StopPlay()
說明 停止播放影片 例子movieStopPlay
TCallFrame
語法TCallFrame(target As String FrameNum
As Long)
說明在由 t a r g e t 指定的時間軸中執行由 FrameNum 指定的幀中的動作
例子要運行主時間軸中第 幀的動作
movieTCallFrame /
TCallLabel
語法TCallLabel(target As String label As String) 說明在由 target 指定的時間軸中執行由 label 指
定的幀中的動作 例子要運行主時間軸中名為HandleScriptNotify
的幀中的動作
movieTCallLabel / HandleScriptNotify
TGotoFrame
語法TGotoFrame(target As String FrameNum
As Long)
說明對於由 t a r g e t 指定的時間軸轉到由 FrameNum 指定的幀
例子
movieTGotoFrame /MovieClip
TGotoLabel
語法: TGotoLabel(target As String label As String) 說明對於由 target 指定的時間軸轉到由 label 指
定的幀
例子movieTGotoLabel /MovieClip MyLabel
TPlay
語法TPlay(target As String) 說明播放由 target 指定的時間軸 例子movieTPlay /MovieClip
TSetProperty
語法TSetProperty(target As String property As
Long value As String)
說明對於由 target 指定的時間軸把由 property 指 定的屬性設為由 value 指定的值（字符串）property 是一個 代表相應屬性的編號（詳情請參閱附表）
例子
Dim nameIndex As Long
nameIndex =
movieTSetProperty /MovieClip nameIndex
NewName
TSetPropertyNum
語法TSetPropertyNum(target As String property
As Long value As Double)
說明對於由 target 指定的時間軸把由 property 指定的屬性設為由 value 指定的值（數字）property 是 一個代表相應屬性的編號 （詳情請參閱附表 ）
例子
Dim visibilityIndex As Long visibilityIndex =
movieTSetProperty /MovieClip visibilityIndex
TStopPlay
語法TStopPlay(target As String) 說明停止播放由 target 指定的時間軸 例子
movieTStopPlay /MovieClipToStop
Zoom
語法Zoom(factor As Long) 說明以 factor 指定的相對百分比來縮放視圖factor
可以理解為從控件窗口看到的影片占實際大小的百分比將
factor 設為 則視圖還原成 % 大小當前視圖已經是
% 時不能再將其縮小
例子 將影片放大兩倍 movieZoom 下面的方法都有返回值
CurrentFrame
語法CurrentFrame() As Long 說明: 返回影片的當前幀數影片的第一幀為 例子
Dim frameNow As Integer frameNow = moviecurrentFrame
FlashVersion
語法FlashVersion() As Long
說明返回控件版本號該值共有三個字節依次是主 版本號次版本號修訂版本號如我用的 Flash 播放器控 件用此方法返回值是 相當於十六進制的
&hA相當於
例子下列程序顯示你所使用的控件版本號
Dim verNum majorNum minorNum revisionNum
As Long verNum=movieFlashVersion majorNum=verNum \
minorNum=(verNum majorNum * ) \
revisionNum = verNum Mod
MsgBox 你的 Flash 播放器控件的版本號 &
majorNum & & minorNum & & revisionNum
GetVariable
語法GetVariable(name As String) As String
說明返回 name 指定的 Flash 變量的值如果變量 不存在則返回 null
例子
Dim firstName radioButtonValue As String firstName = movieGetVariable FirstName radioButtonValue = movieGetVariable(/Form/
RadioButton:Value)
IsPlaying
語法IsPlaying() As Boolean
說明如果影片正在播放則返回 true 例子
If movieIsPlaying Then
MsgBox 影片正在播放中！ End If
PercentLoaded
語法PercentLoaded() As Long
說明返回目前已經載入的影片的百分比取值范圍 從 到
例子
Dim loaded As Boolean
If moviePercentLoaded = Then loaded = true
End If
TCurrentFrame
語法TCurrentFrame(target As String) As Long 說明返回由 target 指定的時間軸中當前幀的號碼返 回的幀號碼是從 開始的也就是說影片的第一幀為 第
二幀為 以此類推 例子
Dim currentFrame As Long
currentFrame = movieTCurrentFrame(/MovieClip)
TCurrentLabel
語法TCurrentLabel(target As String) As String
說明返回由 target 指定的時間軸中當前幀的標簽 如果沒有當前幀的標簽則返回一個空字符串
例子
Dim currentLabel As String
currentLabel = movieTCurrentLabel(/MovieClip)
TGetProperty
語法TGetProperty(target As String property
As Long) As String
說明對於由 target 指定的時間軸返回由 property 指定的屬性值（字符串）其中property 是一個代表相應 屬性的編號（詳情請參閱附表）
例子
Dim nameIndex As Long Dim name As String nameIndex =
name = movieTGetProperty(/ nameIndex)
TGetPropertyNum
語法TGetPropertyNum(target As String property
As Long) As Double
說明對於由 target 指定的時間軸返回由 property 指定的屬性值（數字）其中property 是一個代表相應屬 性的編號（詳情請參閱附表）
例子
Dim framesLoadedIndex As Long Dim framesLoaded As Double framesLoadedIndex =
framesLoaded = movieTGetProperty(/ framesLoadedIndex)
附表獲取及設置屬性相應的每個屬性的編號都可用 在 TGetPropertyTGetPropertyAsNumberTSetProperty 或 TSetPropertyNum 中以指出將要訪問的屬性
事件:
FSCommand
語法FSCommand(command As String args As
String)
說明在 Flash 中為影片添加的 FSCommand 動作可 以從影片中傳遞信息給 Flash 播放器Flash 播放器或包含 播放器控件的網頁或程序播放這個影片時就根據得到的這些 信息執行相應的動作從而實現影片內部與外部應用的交 互操作如在 F l a s h 中給一個按鈕圖片添加如下的 Action
on(release) {
fscommand(fullscreentrue);
}
當 Flash 播放器播放這個文件時點擊按鈕播放器就 會切換到全屏模式下面是 Flash 自帶的播放器能識別的 命令和它們的參數
命令 quit
參數 無參數
作用關閉播放器 命令fullscreen 參數true 或 false
作用設置為 true 使播放器以全屏模式播放設置 為 false 使播放器回到一般窗口模式播放
命令allowscale
參數true 或 false
作用設為 false 將使影片不隨播放器大小改變而改 變始終保持原始尺寸相當於播放器菜單中的 % 設為 true 則恢復影片隨播放器大小而改變的尺寸相當於 播放器菜單中的 Show All
命令showmenu
參數true 或 false
作用設為 true 顯示全部菜單包括菜單欄和播放 區的右鍵菜單設為 false 菜單欄不顯示播放區的右鍵 菜單中只有一項About Macromedia Flash Player
命令 exec
參數應用程序的路徑及名稱 作用執行一個指定的應用程序如在 Flash 影片中
添加動作為
fscommand(execregedit);
則播放器播放影片時執行此動作會打開注冊表編輯 器程序注意喲Flash 自帶的播放器接收到這些命 令後會執行相應的動作但在控件中不會有任何反應只 能由程序在 FSCommand 事件中分析接收到的 command 和args 並編程做出相應處理
OnProgress
語法Event OnProgress(percentDone As Long) 說明發生在 Flash 影片下載時percentDone 是影
片已下載的百分比取值從 到
例子在窗體標題欄中顯示下載進度
Private Sub movie_OnProgress(ByVal percentDone
As Long)
formCaption = 影片已下載 & percentDone
& %
End Sub
OnReadyStateChange
語法Event OnReadyStateChange(newState As
Long)
說明發生在控件的准備狀態改變時下面列出了
newState 可能的值
——正在載入
——未初始化
——已載入
——正在交互
——完成
例子影片載入完成後出現提示信息然後開始播放 影片
Private Sub movie_OnReadyStateChange(newState As
Long)
If newState = Then
MsgBox 影片載入完成！ & vbCrLf & 影片總幀 數 & movieTotalFrames
moviePlay
End If
End Sub
From:http://tw.wingwit.com/Article/program/ASP/201311/21809.html
