Reference TLabel

  TLabel = class(TWidget)
  protected
    { Set FOwnerDraw in a descendant which draws its own text in Paint }
    FOwnerDraw: Boolean;
  public
    { A format string, such as 'Volume: %.1f', which a slider this label is the
      associate of fills in with its position }
    property AssociateText: string read FAssociateText write SetAssociateText;
    { When above zero the text is wrapped to this width }
    property MaxWidth: Float read FMaxWidth write SetMaxWidth;
    { When OwnerDraw is true the theme does not draw the text of the label }
    property OwnerDraw: Boolean read FOwnerDraw;
    property OnClick;
    property OnKeyDown;
    property OnMouseDown;
    property OnMouseMove;
    property OnMouseUp;
  end;