Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
AselObj() doesn't return CA at design time
Message
 
 
To
09/12/2003 11:15:14
General information
Forum:
Visual FoxPro
Category:
Other
Miscellaneous
Thread ID:
00857206
Message ID:
00857264
Views:
23
>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
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform