Inheritance

[Mkontwg]

Hi team

I need some help, I have on my form. Main form that all properties and methods etc. I have instantiated a method to display appstyle called METHOD PUBLIC VOID setGStyle(vStyle AS CHARACTER):
Infragistics.Win.AppStyling.StyleManager:Load(vStyle).
END METHOD.

I have folder called Classes inside there is a classed called 'Style.cls'. My logic to this class is ;


USING Progress.Lang.*.
USING Client.MainForm FROM PROPATH.
BLOCK-LEVEL ON ERROR UNDO, THROW.
CLASS Classes.Styles INHERITS MainForm:
DEFINE VARIABLE vStyle AS CHARACTER NO-UNDO.
METHOD PUBLIC VOID GetStyle(vStyle AS CHARACTER):
setGStyle("C:\Projects\CustomerApplication\src\Styles\Nautilus.isl").
END METHOD.
END CLASS.

I only need a logic to inherit my method used on Mainform only. What am I missing? please help, thanks.

 

[Rod Anderson]

If I understand your question correctly your only missing the OVERRIDE option:

METHOD PUBLIC VOID OVERRIDE GetStyle(vStyle AS CHARACTER):
setGStyle("C:\Projects\CustomerApplication\src\Styles\Nautilus.isl").
END METHOD.

Be careful with inheritance. IMHO evil exist everywhere

Rod