FiveTech Software tech support forums

Posted: **Fri Nov 24, 2006 9:10 am**

I want to create own classes inherit e.g. from TDialog like

CLASS MYTDIALOG FROM TDIALOG

DATA ...
METHOD ...

ENDCLASS

But now, the Method ::ClassName() returns "MYTDIALOG".

As I see, some methods check for ::Classname() like

IF ::ClassName() $ "TDIALOG,..."

so "MYTDIALOG" is not checked.

Is that a problem?

Thanks.

Posted: **Fri Nov 24, 2006 2:50 pm**

CLASS MYTDIALOG FROM TDIALOG

DATA ...
METHOD ...
METHOD ClassName() INLINE "TDIALOG"

ENDCLASS

Saludos
Patricio