Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
AClass() -- possible bug
Message
De
06/12/2016 03:14:02
Thierry Nivelet
Abaque
France
 
 
À
Tous
Information générale
Forum:
Visual FoxPro
Catégorie:
Classes - VCX
Titre:
AClass() -- possible bug
Divers
Thread ID:
01644549
Message ID:
01644549
Vues:
291
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)
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform