... CLASS TGroup FROM TControl METHOD New( nTop, nLeft, nBottom, nRight, cLabel, oWnd, nClrText,; nClrPane, lPixel, lDesign, oFont, lTransparent ) CONSTRUCTOR METHOD ReDefine( nId, cLabel, oWnd, nClrText, nClrPane, oFont, lTransparent ) CONSTRUCTOR METHOD cToChar() INLINE Super:cToChar( "BUTTON" ...