TBGRASVGTheme

type TBGRASVGTheme = class(TBGRATheme)

protected

  procedure LoadTheme();

  procedure SaveTheme();

  procedure CheckEmptyResourceException();

  procedure SliceScalingDraw();

  procedure ColorizeSurface();

public

  constructor Create(); override;

  destructor Destroy; override;

  function PreferredButtonHeight(); override;

  function PreferredButtonWidth(); override;

  procedure DrawButton(); override;

  procedure DrawRadioButton(); override;

  procedure DrawCheckBox(); override;

  procedure SaveToFile();

  procedure LoadFromFile();

  procedure SaveToStream();

  procedure LoadFromStream();

  procedure LoadFromResource();

  procedure LoadDefaultTheme;

published

  property CheckBoxUnchecked: TStringList; [rw]

  property CheckBoxChecked: TStringList; [rw]

  property RadioButtonUnchecked: TStringList; [rw]

  property RadioButtonChecked: TStringList; [rw]

  property CheckBoxTextSpacing: Integer; [rw]

  property ButtonNormal: TStringList; [rw]

  property ButtonHover: TStringList; [rw]

  property ButtonActive: TStringList; [rw]

  property ButtonSliceScalingLeft: Integer; [rw]

  property ButtonSliceScalingTop: Integer; [rw]

  property ButtonSliceScalingRight: Integer; [rw]

  property ButtonSliceScalingBottom: Integer; [rw]

  property GlyphTextSpacing: Integer; [rw]

  property ButtonTextSpacing: Integer; [rw]

  property ColorizeNormal: string; [rw]

  property ColorizeNormalOp: TBlendOperation; [rw]

  property ColorizeHover: string; [rw]

  property ColorizeHoverOp: TBlendOperation; [rw]

  property ColorizeActive: string; [rw]

  property ColorizeActiveOp: TBlendOperation; [rw]

  property ColorizeDisabled: string; [rw]

  property ColorizeDisabledOp: TBlendOperation; [rw]

end;

TBGRASVGTheme

TBGRATheme

TObject