Hello, [CODE]
#include "FiveWin.ch" #ifdef __HARBOUR__ #ifndef __XHARBOUR__ #include "\harbour\contrib\xhb\xhbcls.ch" #endif /* __XHARBOUR__ */ #endif /* __HARBOUR__ */ #define COMBO_BASE WM_USER #define CB_GETDROPPEDWIDTH ( COMBO_BASE + 25 ) && 339 ************* function main ************* MY_CLASSES() return NIL ******************* function MY_CLASSES ******************* * This work, but "n" is not necessary *extend class TCombobox with message GETDROPPEDWIDTH( n ) inline ::SendMsg( CB_GETDROPPEDWIDTH, 0, 0 ) * This would not be the correct way to declare this ? * This does not work, because it generates error: myc1.prg(31) Error E0030 Syntax error "syntax error at 'CLASS'" extend class TCombobox with message GETDROPPEDWIDTH() inline ::SendMsg( CB_GETDROPPEDWIDTH, 0, 0 ) * This work, ok :) *extend class TCombobox with message GETDROPPEDWIDTH inline ::SendMsg( CB_GETDROPPEDWIDTH, 0, 0 ) msgstop( "ready" ) return NIL [ENDCODE] All three statements should work, right ? Regards, Rossine. -- View this message in context: http://www.nabble.com/about-%22extend-class%22-tp22309603p22411625.html Sent from the Harbour - Dev mailing list archive at Nabble.com. _______________________________________________ Harbour mailing list [email protected] http://lists.harbour-project.org/mailman/listinfo/harbour
