动画显示窗体

procedure tform1.formcreate(sender: tobject);
begin
  animatewindow(handle,2000{速度：2秒},aw_blend);
{ aw_hor_positive = $00000001;
  aw_hor_negative = $00000002;
  aw_ver_positive = $00000004;
  aw_ver_negative = $00000008;
  aw_center = $00000010;
  aw_hide = $00010000;
  aw_activate = $00020000;
  aw_slide = $00040000;
  aw_blend = $00080000;
}
end;