Delphi Tips Trick

For Newbie

Iklan Responsive Atas

LightBlog
Responsive Ads Here

Tuesday, 15 November 2011

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;

No comments: