/////////////////////////////////////////////////////////////////////
// LABEL
/////////////////////////////////////////////////////////////////////

#command @ <row>, <col> LABEL <name> ;
      [ OBJ <obj> ] ;
      [ <dummy1: OF, PARENT> <parent> ] ;
      [ VALUE <value> ] ;
      [ <dummy: ACTION, ON CLICK, ONCLICK> <action> ] ;
      [ WIDTH <width> ] ;
      [ HEIGHT <height> ] ;
      [ <autosize: AUTOSIZE> ] ;
      [ FONT <fontname> ] ;
      [ SIZE <fontsize> ] ;
      [ <bold: BOLD> ] ;
      [ <italic: ITALIC> ] ;
      [ <underline: UNDERLINE> ] ;
      [ <strikeout: STRIKEOUT> ] ;
      [ TOOLTIP <tooltip> ] ;
      [ BACKCOLOR <backcolor> ] ;
      [ FONTCOLOR <fontcolor> ] ;
      [ <border: BORDER> ] ;
      [ <clientedge: CLIENTEDGE> ] ;
      [ <hscroll: HSCROLL> ] ;
      [ <vscroll: VSCROLL> ] ;
      [ <transparent: TRANSPARENT> ] ;
      [ <rightalign: RIGHTALIGN> ] ;
      [ <centeralign: CENTERALIGN> ] ;
      [ HELPID <helpid> ] ;
      [ <invisible: INVISIBLE> ] ;
      [ <rtl: RTL> ] ;
      [ <nowordwrap: NOWORDWRAP> ] ;
      [ <noprefix: NOPREFIX> ] ;
      [ INPUTMASK <picture> ] ;
      [ SUBCLASS <subclass> ] ;
      [ <disabled: DISABLED> ] ;
	   [ <lcenteralign: VCENTERALIGN> ] ;
   => ;
      [ <obj> := ] _OOHG_SelectSubClass( TLabel(), [ <subclass>() ] ):Define( ;
            <(name)>, <(parent)>, <col>, <row>, <value>, <width>, <height>, ;
            <fontname>, <fontsize>, <.bold.>, <.border.>, <.clientedge.>, ;
            <.hscroll.>, <.vscroll.>, <.transparent.>, [ <backcolor> ], ;
            [ <fontcolor> ], <{action}>, <tooltip>, <helpid>, <.invisible.>, ;
            <.italic.>, <.underline.>, <.strikeout.>, <.autosize.>, ;
            <.rightalign.>, <.centeralign.>, <.rtl.>, <.nowordwrap.>, ;
            <.noprefix.>, <picture>, <.disabled.>, <.lcenteralign.> )