Animation Effects On Form Delphi

Adding animated effects on Delphi forms. Congenital animation effects library windows.

Function used: 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

Example of implementation:
TForm1.FormCreate procedure (Sender: TObject);
begin
   AnimateWindow (Handle, 1000, AW_VER_NEGATIVE);
end;