TCustomBCLabel

type TCustomBCLabel = class(TBCStyleGraphicControl)

protected

  procedure CalculatePreferredSize(); override;

  class function GetControlClassDefaultSize; override;

  procedure TextChanged; override;

  procedure DrawControl; override;

  procedure RenderControl; override;

  function GetStyleExtension; override;

  property AutoSize;

  property Background: TBCBackground; [rw]

  property Border: TBCBorder; [rw]

  property FontEx: TBCFont; [rw]

  property Rounding: TBCRounding; [rw]

  property InnerMargin: single; [rw]

public

  constructor Create(); override;

  destructor Destroy; override;

  procedure UpdateControl; override;

  procedure SaveToFile(); override;

  procedure LoadFromFile(); override;

  procedure OnFindClass();

end;

TCustomBCLabel

TBCStyleGraphicControl

TBCGraphicControl

TBGRAGraphicCtrl

TObject