Membuat Form Flash menggunakan Delphi

Buka Borland Delphi
Buatlah 2 buah form
Masukkan komponen pada form1 sbb:

• 1 buah Image, silahkan ubah gambar sesuai selera pada menu Picture pada object inspektor
• 1 buah ProgressBar
• 1 buah Timer

Pada Form1 atur pada Object Inspektor :

• AutoZise menjadi True
• BorderStyle menjadi bsNone

Klik 2x pada Timer dan masukkan Coding sbb:
" progressbar1.Position:=progressbar1.Position+20;
if progressbar1.Position=progressbar1.Max then begin
Timer1.Enabled:=false;
Hide;
Form2.Show;
end;"
Selesai jalankan Program.


Untuk download programnya klik disini. Semoga bermanfaat.