Procedure Teste Set SysMenu Save Set SysMenu To With _Screen .Caption = " This is a Test Program" .BorderStyle = 2 .AutoCenter = .T. .WindowState = 2 EndWith Application.Visible = .T. Messagebox ("Enter 'ok' to end program") Quit EndProcIf you compile this prg into an executable and run it, you'll see what I'm experiencing. If there is something else I should add or modify, please tell me.