latihan Pilih file cool.avi yang ada di direktori C:\program files\Borland\Delphi6\ demos\coolstuf kemudian klik Open.
{"Image DocumentName": "latihanPilih file cool.avi yang ada di direktori C:\\program files\\Borland\\Delphi6\\ demos\\coolstuf kemudian klik Open.", "Image ImageDescription": "Ubah properti repetitions menjadi 5. Letakkan kontrol animate tersebut pada pojok kanan atas form. Double klik pada event OnActivate dari form, kemudian ubah procedure-nya seperti: procedure TForm1.FormActivate(Sender: TObject); begin. animate1.Active:=True; end; Tambahkan komponen Label pada form, kemudian ubahlah property caption menjadi Selamat Datang di Cool Image 4.0. Atur jenis huruf dan ukurannya. Sehingga akan nampak sebagai berikut: Klik Komponen animate , kemudian pada object inspector klik tab event. Pada kolom OnStop, double klik pada sebelah kanannya sehingga muncul kode editor. Ubahlah procedure animate1stop seperti berikut: procedure TForm1.Animate1Stop(Sender: TObject); form1.close; Jalankan programnya.", "Image XResolution": "37", "Image YResolution": "37", "Image ResolutionUnit": "Pixels/Centimeter", "Image Software": "SlidePlayer", "Image YCbCrPositioning": "Centered"}