Anlatım Delphi 7 ye göre yapılmıştır...
Component Menüsünden "I
mport ActiveX Control" e tıklayalım açılan pencereden
Shockwave Flash (version 1.0) ı bulun ve seçin pencerenin en altında
Install buttonuna tıklayın ve artık bileşenimiz ActiveX sekmesinde hazır halde bizi bekliyor...
Formumuza ...
1 adet activeX sekmesinden ShockwaveFlash1 ekleyelim
1 adette button koyalım
button un OnClick olayına aşağıdaki kodu yazalım ...
kullanımı :
PHP Kod: Kodu kopyalamak için üzerine çift tıklayın!
ShockwaveFlash1.Movie :='SWF dosyasının yolu';
ShockwaveFlash1.Base :='swf dosyasının yolu';
ShockwaveFlash1.Play;
eğer exe ile swf dosyası aynı klasörde ise aşağıdaki kod da size yardımcı olablilir..
PHP Kod: Kodu kopyalamak için üzerine çift tıklayın!
ShockwaveFlash1.Movie :=ExtractFilePath(Application.ExeName)+'dosya_adı.swf';
ShockwaveFlash1.Base :=ExtractFilePath(Application.ExeName)+'dosya_adı.swf';
ShockwaveFlash1.Play;