Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Form wizard
Message
De
19/11/2001 15:04:28
 
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Titre:
Divers
Thread ID:
00583429
Message ID:
00583623
Vues:
40
Hello Timothy,

You don't need to be able to visually access all of the controls for this method to work. You only have to select one control on the form (in design mode). You put can this code in a .prg file and run it, it will go through all the controls on the form. Pretty cool, huh?

Another issue to consider is whether or not you should really be putting that many textboxes on the same form...will it be user friendly? Pageframes may be more appropriate.

>>
>>Then select any one control on form and run :
>>
>>
aselobj(arrForm,1)
>>for each oControl in arrForm[1].Controls
>> with oControl
>> if upper(.Baseclass)='TEXTBOX' and !empty(.Controlsource)
>>   .ControlSource = substr(.Controlsource, at('.',.Controlsource)+1)
>> endif
>> endwith
>>endfor
Cetin
>
>Cetin, I have 50 fields, I only only visually access 18, whcih is how many can be displayed with my designer form maximized. Even if I scroll or resize! :(
Steve Gibson
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform