Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Closing _screen
Message
De
03/08/1999 12:35:46
 
 
À
Tous
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Titre:
Closing _screen
Divers
Thread ID:
00249281
Message ID:
00249281
Vues:
58
I am trying to close a form in the init of the form when a condition is true. The form closes fine but the _screen stays active.

I am calling the form from a program.

do form formname
read events

This is the code that I'm using in the init of the form

if condition is .t.
thisform.cmdexit.click
return .f.
endif


thisform.cmdexit.click has the following code:

local lnchoice
if thisform.editmode=.t.
lnchoice=messagebox("You have made changes to this record! Would you like to Save Changes?", 16+4, "Save Changes")
if lnchoice=7
thisform.editmode=.f.
thisform.cmdcancel.click
else
thisform.cmdsave.click
endif
endif
thisform.addlogrec(this.name, "")
thisform.release
Clear events


I appreciate any suggestions that could point me in the right direction.

TIA
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform