---- Flash動(dòng)畫(huà)不僅包含動(dòng)畫(huà)，還可有聲音、超文本連接，同時(shí)由于它是矢量格式文件，生成的這種包含動(dòng)畫(huà)、聲音等的文件（*.swf）很小，非常適合在網(wǎng)絡(luò)上傳輸使用，因而在當(dāng)前Web網(wǎng)頁(yè)技術(shù)中得到很快發(fā)展。本文討論在PowerBuilder6.5數(shù)據(jù)庫(kù)編程中用Flash4提供的控件"Swflash.ocx"進(jìn)行Web站點(diǎn)訪問(wèn)，獲取Flash動(dòng)畫(huà)播放。

---- 下面是具體作法:

建立應(yīng)用對(duì)象
---- 運(yùn)行PB，選菜單"File | New"建立一個(gè)應(yīng)用對(duì)象，將它起名為app_flash，并將其應(yīng)用對(duì)象庫(kù)起名為flash.pbl存盤；選工具欄的圖標(biāo)"Window"放入一個(gè)窗口，起名為w_flash，在這個(gè)窗口中放下述控件：一個(gè)單行文本編輯框（SingleLineEdit）sle_1用來(lái)輸入要提取進(jìn)行演播的Flash動(dòng)畫(huà)文件(*.sws)所在的URL's（存放在本機(jī)磁盤或存放在Internet遠(yuǎn)程Web服務(wù)器的Flash動(dòng)畫(huà)文件）；兩個(gè)命令按鈕（CommandButton）cb_1用來(lái)執(zhí)行提取并演播鍵入文本框sle_1中的Flash文件，命令按鈕cb_2用來(lái)退出軟件運(yùn)行。


用OLE連接 Flash 4的控件Swflash.ocx
---- 選菜單"Cotrols | OLE"，出現(xiàn)窗口"Insert object"，選"Insert Control"，在Control Tyle欄里找出"Shockware Flash Object"（若該控件尚未注冊(cè),可先選"Register Now"對(duì)該控件進(jìn)行注冊(cè)）；回到PB窗口，用鼠標(biāo)點(diǎn)擊安放此控件在窗口上并調(diào)整大小。（再用鼠標(biāo)右擊，出現(xiàn)浮動(dòng)菜單，選"OCX Property"設(shè)置控件的屬性）。


對(duì)Flash 4的控件的主要屬性
---- Flash 4的控件Swflash.ocx主要提供了下列屬性在編程中使用：

---- Movie屬性：存放Flash動(dòng)畫(huà)文件的URL's：在本機(jī)磁盤時(shí)寫(xiě)全目錄名，例如： d:\lxrj\lixiang\lxpaper\2000\t04\bol.swf 在Internet上按瀏覽網(wǎng)頁(yè)的方式：例如（下面是實(shí)際存放在貴州大學(xué)Web服務(wù)器上的一個(gè)Flash文件） http://www.gzu.edu.cn/~lixiang/bol.swf

---- Quality（分辨率）屬性：播放的分辨率，有0（low），1（AutoLow），2（Hight），3（AutoHight），4（Best）五個(gè)值

---- Scale屬性：播放的屏幕，有0（ShowAll）, 1（NoBorder）, 2（ExactFit）三個(gè)值

---- Loop（循環(huán)播放）屬性：true, false

---- menu（菜單）屬性：true, false


對(duì)Flash 4的控件Swflash.ocx進(jìn)行編程
---- 明白了Flash控件的主要屬性后，即可根據(jù)應(yīng)用的需要進(jìn)行編程，在我們上面對(duì)窗口的安排中，僅需對(duì)"播放"按鈕cb_1的clicked事件錄入下述代碼即可（不愿編代碼的讀者可以用鼠標(biāo)右擊窗口的OLE控件界面，打開(kāi)屬性頁(yè)填寫(xiě)）：

ole_1.Object.movie=sle_1.text
ole_1.Object.scale=0
ole_1.Object.loop=true
ole_1.Object.Quality=4
ole_1.Object.Scale=2
ole_1.Object.menu=true

---- 為方便退出，在另一個(gè)命令按鈕cb_2的clicked事件中錄入代碼：close(parent)

運(yùn)行測(cè)試：
---- 關(guān)閉窗口w_flash，回到應(yīng)用對(duì)象app_flash，選菜單"Entry | Script"，在open事件中錄入代碼： open(w_flash) 后選圖標(biāo)"Run"，運(yùn)行（URL's：http://www.gzu.edu.cn/~lixiang/bol.swf是貴州大學(xué)站點(diǎn)，24小時(shí)開(kāi)放，有興趣的讀者可用來(lái)調(diào)試這個(gè)程序）。