----本文參考了Delphi世界之大富翁論壇上阿蒙和浦青鋒兩位大俠的
意見。
----原來我並不打算把這種問題放在網路上,我以為大家都會知道。後
來好友流雲建議說,她們班好多人都學Flash,很想知道如何在Delphi
中調用Flash。我就講了一下,並順便把它放在了主頁上。
----如果你的計算機已裝了Flash,那就非常簡單。如果還沒裝,那麼
光線在網路上下載flash 外掛也可以,然後啟動你的Delphi,再Component
選單項目選Import ActiveX Control...,接下來在Import ActiveX
Control項目就會有Sockwave Flash (版本號)這項出現,勾選它再按
Install...按鈕。
----現在你的Component面板有ShockwaveFlash控制了吧,它的使用方
法和其他控制沒有大的差別,做一個簡單範例。
----新建一個PRoject,在Form上放一個button和一個opendialog 控
件,再放上ShockwaveFlash控制。 opendialog 用來開啟Flash檔(*.
swf),button的onclick 事件如下:
begin
----opendialog1.execute;
----swf:=opendialog1.filename;
----shockwaveflash1.Movie:=swf;
----shockwaveflash1.play;
end;
----編譯通過,就可以用按鈕開啟對話框,選擇*.swf檔就可以
了。