>Do this >Do that > >proc this > ............ >endproc > >proc that > ............ >endproc >>
* Consider you have a login form like this - this form is NOT modal * Form Init * ... any init code this.Show read events * Form OK/Cancel or whatever button that'd release form click thisform.Hide clear events * Main code *.... initialization any code Local frmLogin DO form login name frmLogin oApp.oCurrentUser = frmLogin.oUserInfo && Save oCurrentUser to oApp custom object frmLogin.Release Release frmLogin If IsNull( oApp.oCurrentUser ) && If not a valid user just shutdown Return endif Do MainMenu.mpr *or Do Form MainForm Read Events * Cleanup code ...Cetin