[HELP] ShockwaveFlash
more 8 years ago
agis
procedure TForm1.BitBtn1Click(Sender: TObject);
begin
if OpenDialog1.Execute then
begin
if OpenDialog1.FileName='' then
begin
ShockwaveFlash1.Movie:=GetCurrentDir +'(OpenDialog1.FileName)';
ShockwaveFlash1.Play;
end;
end;
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
ShockwaveFlash1.Movie:=GetCurrentDir + '/flash2.swf';
ShockwaveFlash1.Play;
end;
para master listing diatas udah bener blm bwt ngrubah tampilan flash1 menjadi flash2 yg udah dipilih pake opendialog?
mohon bantuannya para master,,,pliiss,,,ane butuh bgt...
more 8 years ago
halimanh
if OpenDialog1.FileName='' then diganti if OpenDialog1.FileName<>'' then
Juga nggak perlu pake GetCurrentDir()
more ...
- Pages:
- 1
Reply | Report as Obsolete
Last Articles
Last Topic
- Archive
- Total di DBGrid
by tomifernandus in Hal umum tentang Pascal Indonesia more 8 years ago - tanya masalah hitungan
by ghopal in Hal umum tentang Pascal Indonesia more 8 years ago - koreksi coding simpan file tabel...
by idhiel in Hal umum tentang Pascal Indonesia more 8 years ago - Looping lagi...
by idhiel in Hal umum tentang Pascal Indonesia more 8 years ago - report yang paling tepat n mendukung delphi 2010
by yanuar1087 in Tip n Trik Pemrograman more 8 years ago - Membuat No Nota Secara Otomatis
by eni in Hal umum tentang Pascal Indonesia more 8 years ago
Random Topic
- gimana ngebangun aplikasi SMS pake SMPP
by chakhar86 in Network, Files, I/O & System more 13 years ago - Cetak matriks m x n ke memo
by RoenZ in Tip n Trik Pemrograman more 13 years ago - Quantumgrid dang Grouping field Tdatetime
by anis_nuraini in MySQL more 14 years ago - Tanya : Lisensi Software Asli BORLAND DELPHI 7 ENTERPRISE
by faisal801m in Hal umum tentang Pascal Indonesia more 11 years ago - Gairah baru
by Tbawor in Hal umum tentang Pascal Indonesia more 12 years ago - program ubah teks RGB KE teks biasa
by tita in Tip n Trik Pemrograman more 12 years ago - Shutdown atau restart dengan indy
by mankerman in Network, Files, I/O & System more 11 years ago - Menampilkan data di database dengan combobox
by nino_stenfidz in Tip n Trik Pemrograman more 9 years ago - Open file with......
by greatjon2002 in Tip n Trik Pemrograman more 14 years ago - funtion insert data dengan array
by cyber2000 in Tip n Trik Pemrograman more 11 years ago