Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
AClass() -- possible bug
Message
From
06/12/2016 03:14:02
Thierry Nivelet
Abaque
France
 
 
To
All
General information
Forum:
Visual FoxPro
Category:
Classes - VCX
Title:
AClass() -- possible bug
Miscellaneous
Thread ID:
01644549
Message ID:
01644549
Views:
290
Hi,

For an object of class 'Olecontrol', looks like aClass() chokes on the parent class:
form = CreateObject('form')
form.AddObject('oleClass_2', 'oleClass_2') && a class derived from Olecontrol needs to be instantiated in a visual container

? AClass(aa, form.oleClass_2), aa && obtained 1: 'OLECLASS_2', expected 3: 'OLECLASS_2', 'OLECLASS_1', 'OLECONTROL'

define class oleClass_2 as oleClass_1
enddefine

define class oleClass_1 as Olecontrol
	oleClass = 'Shell.explorer.2'
enddefine
Thierry Nivelet
FoxinCloud
Give your VFP application a second life, web-based, in YOUR cloud
http://foxincloud.com/
Never explain, never complain (Queen Elizabeth II)
Next
Reply
Map
View

Click here to load this message in the networking platform