Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Checking for subclassed controls in forms
Message
General information
Forum:
Visual FoxPro
Category:
Classes - VCX
Miscellaneous
Thread ID:
00109793
Message ID:
00110129
Views:
36
>>>>I am currently framework challenged.
>>>>I have an old class lib in my project that has several subclassed controls and I want to check to see if I am using a certain subclassed control on any of my forms. Is there a way to check for the existance of a particular sublassed control, from this classlib, on any of my forms in the project without opening up each form individually? I am trying to clean up the classlib and discard the controls that are not currently in use on a form so I can get a little more organized with my classlib. I've got a mess here!
>>>>
>>>>Thanks.
>>>>
>>>>John
>>>
>>>Hello John,
>>>
>>> You can USE the VCX/SCX and search for the class name in CLASS field.
>>>You may want to write a small prg which scans all the VCX and SCX and produce
>>>results either on screen or to a file.
>>>
>>>Bye
>>>Jayesh
>>
>>Hi Jayesh,
>>
>>I haven't played too much in this area. Can you send a quick example.
>>
>>Thanks Much!
>>
>>john.
>
>Here's a sample. BTW, this is also an experiment in using VFP 6.0's class browser to convert formatted code to HTML for use in online samples. If it doesn't work, I'll repost.
>
>
>
>		CD "c:\myproject\forms"
>		ADIR(formfiles,"*.scx")
>		FOR I = 1 to ALEN(formfiles,1)
>			USE (formfiles[i,1])
>			SCAN FOR class = "mytextclass"
>				?formfiles[i,1] + objname
>			ENDSCAN
>			USE
>		ENDFOR
>
>	ENDPROC
>
>
>
Hi Erik,

Thanks for the sample! I've been putting off cleaning up my libraries, but now it's time to get busy.

Thanks for sharing your code.

john.
Previous
Reply
Map
View

Click here to load this message in the networking platform