Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
AselObj() doesn't return CA at design time
Message
 
 
À
09/12/2003 11:15:14
Information générale
Forum:
Visual FoxPro
Catégorie:
Autre
Divers
Thread ID:
00857206
Message ID:
00857264
Vues:
24
>OK,
>but how can I know which one is selected by the user?
>(you know... the user have the DataEnvironment designer opened and selected one CursorAdapter...)

Sounds like you are trying to create a builder. I looked at the code for the DEBuilder [BuilderForm.SCX extracted from the XSOURCE.ZIP file], so maybe what is in the followng comments will help you:
* Put a reference to the object we're building into our oSource property. If we
* were called from BUILDER.APP, the first element of the global wbaControl
* array will contain a reference to the object.

local laObjects[1], ;
	lnObjects
external array wbaControl
if type('wbaControl[1].Name') = 'C'
	This.SetSourceObject(wbaControl[1])
else
	lnObjects = aselobj(laObjects)
	if lnObjects > 0
		This.SetSourceObject(laObjects[1])
	endif lnObjects > 0
endif type('wbaControl[1].Name') = 'C'
Mark McCasland
Midlothian, TX USA
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform