*:Form's Rezise method
nState = this.WindowState 
DO CASE 
   CASE nstate = 0
      MESSAGEBOX("Normal")
   CASE nstate = 1
      MESSAGEBOX("Minimized")
   CASE nstate = 2
      MESSAGEBOX("Maximized")
ENDCASE 

DO WHILE .T.
      ME.Work()
ENDDO