TOvcCustomRotatedLabel

type TOvcCustomRotatedLabel = class(TOvcGraphicControl)

protected

  FAlignment: TAlignment;

  FAutoSize: Boolean;

  FCaption: string;

  FFontAngle: Integer;

  FOriginX: Integer;

  FOriginY: Integer;

  FShadowColor: TColor;

  FShadowedText: Boolean;

  rlBusy: Boolean;

  function GetTransparent;

  procedure SetAlignment();

  procedure SetAutoSize(); override;

  procedure SetCaption();

  procedure SetOriginX();

  procedure SetOriginY();

  procedure SetShadowColor();

  procedure SetShadowedText();

  procedure SetTransparent();

  procedure SetFontAngle();

  procedure lblAdjustSize;

  procedure lblDrawText();

  procedure CMFontChanged(); message;

  procedure CMTextChanged(); message;

  procedure Loaded; override;

  procedure Paint; override;

  procedure SetName(); override;

  property Alignment: TAlignment; [rw]

  property AutoSize: Boolean; [rw]

  property Caption: string; [rw]

  property FontAngle: Integer; [rw]

  property OriginX: Integer; [rw]

  property OriginY: Integer; [rw]

  property ShadowColor: TColor; [rw]

  property ShadowedText: Boolean; [rw]

  property Transparent: Boolean; [rw]

public

  constructor Create(); override;

  property Canvas;

end;

TOvcCustomRotatedLabel

TOvcGraphicControl

TObject