Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Can I get a listing of ControlSources in a form?
Message
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Divers
Thread ID:
00569049
Message ID:
00569092
Vues:
22
This message has been marked as a message which has helped to the initial question of the thread.
>I was wondering if it's possible to get a printout of all the ControlSources used in a form?
>
>TIA,
>Rick Liebespach

You can use a number of AMembers() calls to check the controlsource property of those objects who have them:
x=Amembers(frmMembers, This, 2)
For y=1 To x
	lcSource = frmMembers(y)
	lcObjects = lcObjects + lcSource
	
	If Type("This." + lcSource + ".ControlSource") <> "U" Then
		lcObjects = lcObjects + ": " + Eval("This." + lcSource + ".ControlSource")
	Endif

	lcObjects = lcObjects + CRLF
Next
Although if you have container objects like grids you might have to drill down several levels deep to get at every controlsource property. HTH
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform