动画窗口

 function   boolean   animatewindow   (   long   hwnd,   long   dwtime,   long   dwflags   )   library   "user32.dll"  
  constant   long     aw_hor_positive             =   1    
  constant   long   aw_hor_negative   =     2    
  constant   long   aw_ver_positive   =     4    
  constant   long   aw_ver_negative   =   8    
  constant   long   aw_center   =   16    
  constant   long   aw_hide   =       65526    
  constant   long   aw_activate       =     131072    
  constant   long   aw_slide   =   262144    
  constant   long   aw_blend   =   524288    
  然后在你要打开的那个窗口的open   事件中写  
  long   ll_handle      
  ll_handle   =   handle   (   this   )  
  animatewindow   (   ll_handle,   300,aw_slide   +     aw_center   +   aw_activate)  
  其中，300是时间，后面是方式···  
  可以再试试下面的效果  
  animatewindow   (   ll_handle,   300,aw_blend   +   aw_center   +   aw_activate)  
  animatewindow   (   ll_handle,   300,aw_slide   +   aw_hor_positive)  
  animatewindow   (   ll_handle,   300,aw_slide   +   aw_ver_positive)  
  animatewindow   (   ll_handle,   300,aw_ver_negative)