TSpkCustomCheckBox

type TSpkCustomCheckBox = class(TSpkBaseButton)

protected

  procedure CalcRects; override;

  procedure ConstructRect();

  function GetChecked; override;

  function GetDefaultCaption; override;

  function GetDropdownPoint; override;

  procedure SetChecked(); override;

  procedure SetState(); virtual;

public

  constructor Create(); override;

  procedure Draw(); override;

  function GetGroupBehaviour; override;

  function GetSize; override;

  function GetTableBehaviour; override;

  function GetWidth; override;

published

  property Checked: Boolean;

  property State: TCheckboxState; [rw]

  property TableBehaviour: TSpkItemTableBehaviour; [rw]

end;

TSpkCustomCheckBox

TSpkBaseButton

TSpkBaseItem

TSpkComponent

TObject