Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Releasing Form Object - Best Practices
Message
 
 
À
09/01/2004 12:27:21
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Divers
Thread ID:
00865496
Message ID:
00865978
Vues:
12
>I typically do the following:
>
>
>DO FORM e_custcv NAME Oe_custcv LINKED WITH lvchoice
>IF UPPER(TYPE('oe_custcv'))="O" .AND. Oe_custcv<>.NULL.
>	Oe_custcv.VISIBLE=.F.
>	Oe_custcv.RELEASE()
>ELSE
>	Oe_custcv=.NULL.
>	RELEASE Oe_custcv
>ENDIF
>
>However, couldn't I simply just do:
>
>DO FORM e_custcv NAME Oe_custcv LINKED WITH lvchoice
>RELEASE Oe_custcv
>
>
>Since the form is released when Oe_custcv is released (it runs the form's release method, does it not?), isn't the single line just as good?

To determine if variable exist ---
FUNCTION NoExistingVar
   LPARAMETERS cCheckVar
   hError= ON("ERROR")
   lNoVar= .F.
   ON ERROR lNoVar= .T.
   WAIT WINDOW NOWAIT STR(LEN(cCheckVar))
   WAIT CLEAR 
   ON ERROR &hError
   RETURN lNoVar
Edgar L. Bolton, B.S. B.B.A.
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform