Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Re-post -- How could this be
Message
 
À
Tous
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Titre:
Re-post -- How could this be
Divers
Thread ID:
00764752
Message ID:
00764752
Vues:
66
cFrmDetailListing absolutely does not call back to THISFORM and change THISFORM.lIsOkToSave

What am I missing here.
* Evaluates to .F.
WAIT WINDOW '1: ' + IIF(THISFORM.lIsOkToSave, 'T', 'F')

oForm = NEWOBJECT('cfrmDetailListing',    ;
                  'MCSForms_DetailInput', ;
                  NULL,                   ;
                  cProvider)

*Still .F.
WAIT WINDOW '1: ' + IIF(.lIsOkToSave, 'T', 'F')

IF VARTYPE(oForm) = 'O'
      WITH oForm
         .SHOW(1)
         * All of sudden true and remains .t. when it should not be.
         * should be .f.
         WAIT WINDOW '2: ' + IIF(THISFORM.lIsOkToSave, 'T', 'F')

         IF .lSelected
            cRetVal = .cCode
            THISFORM.cPCAdd = '4'
         ENDIF   

         WAIT WINDOW '3: ' + IIF(THISFORM.lIsOkToSave, 'T', 'F')

      ENDWITH
ENDIF
What ben makes tracks for what wil be. Words in the air pirnt foot steps on the groun for us to put our feet in to.

Riddley Walker
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform