Menambah efek animasi pada form delphi. Efek animasi bawaan library windows.
Fungsi yang digunakan: function AnimateWindow(wHnd: hWnd; dwTime: DWORD; dwFLags: DWORD);
{dwFlags}
AW_BLEND
AW_CENTER
AW_HOR_POSITIVE
AW_HOR_NEGATIVE
AW_VER_POSITIVE
AW_VER_NEGATIVE
Contoh implementasi:AW_BLEND
AW_CENTER
AW_HOR_POSITIVE
AW_HOR_NEGATIVE
AW_VER_POSITIVE
AW_VER_NEGATIVE
procedure TForm1.FormCreate(Sender: TObject);
begin
AnimateWindow(Handle,1000,AW_VER_NEGATIVE);
end ;
begin
AnimateWindow(Handle,1000,AW_VER_NEGATIVE);
end ;
Sumbe : http://opxbit.web.id
Download Source Code Delphi - Memberi Efek Animasi Pada Form File: anim_window.zip |
tHANKS GAN PETUNJUKNYA....
BalasHapus