Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Programmatically add code to all controls
Message
 
 
À
11/12/2003 17:35:01
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Divers
Thread ID:
00858363
Message ID:
00858397
Vues:
18
Run your code below from a PRG file. You need to account for the container classes that your texboxes are on in the modified code below.

>That's what I'm currently working on, but for some reason after I do a dodefault in the init of the form, my labojects array does not get created using the code below:
MODIFY FORM MyForm NOWAIT
aselobj(laForm, 1)
loForm = laForm(1)
WITH THIS
    FOR EACH oControl IN loForm
        * test to see of baseclass is a textbox here. if not, loop
		LcDesiredCode = "THISFORM.mcalendorse=.T." + CHR(13) ;
		+ oControl.ReadMethod("VALID")
		oControl.WriteMethod("VALID", LcDesiredCode)
    ENDFOR
ENDWITH
Mark McCasland
Midlothian, TX USA
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform