Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Problem with CA - SelectCmd property is empty
Message
 
 
To
16/04/2003 16:03:32
Peter Wagner
Point Informática Ltda.
Limeira, Brazil
General information
Forum:
Visual FoxPro
Category:
Other
Miscellaneous
Thread ID:
00778588
Message ID:
00778896
Views:
25
I have provided 2 properties lUseCursorSchema and lNoDataOnLoad. Use those instead of adding your own code for this. Also, don't change what goes where. Once you add a CA from the VCX created by my builder to the DE, Your INIT code should be:
local llReturn
do case
	case not pemstatus(This, '__VFPSetup', 5)
		This.AddProperty('__VFPSetup', 0)
	case This.__VFPSetup = 2
		This.__VFPSetup = 0
		return
endcase
llReturn = dodefault()
*** Setup code: DO NOT REMOVE

*** End of Setup code: DO NOT REMOVE
if This.__VFPSetup = 1
	This.__VFPSetup = 2
endif
return llReturn
... and your AutoOpen Should be like:
*** Setup code: DO NOT REMOVE
if not pemstatus(This, '__VFPSetup', 5)
	This.AddProperty('__VFPSetup', 1)
	This.Init()
endif
*** End of Setup code: DO NOT REMOVE
The code is structured the way it is because the order of event firing is NOT what you expect. Please read the comments at the beginning of the CABuilder.prg file for help on how to add a CA subclass from the VCX to a DE.
Mark McCasland
Midlothian, TX USA
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform