Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Disable all except labels
Message
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
00287091
Message ID:
00287118
Views:
19
Thanks Guys, Works great.


>Hi Alan,
>
>Try this code:
>
>lnControls = ALEN( THISFORM.Controls )
>FOR lnLoop = 1 TO lnControls
> IF UPPER( THISFORM.Controls[ lnLoop ].BaseClass ) # "LABEL"
> THISFORM.Controls[ lnLoop ].Enabled = .F.
>
> ENDIF && check for all non-label controls
>ENDFOR && lnLoop
>
>>What's the best way to disable all of the controls on a form except labels?
>>
>>TIA
Alan Trosky
MIS Director
Pennsylvania Bar Association
Harrisburg PA 17108
Previous
Reply
Map
View

Click here to load this message in the networking platform