Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Form wizard
Message
From
19/11/2001 15:04:28
 
General information
Forum:
Visual FoxPro
Category:
Forms & Form designer
Title:
Miscellaneous
Thread ID:
00583429
Message ID:
00583623
Views:
35
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
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform