TCDToolBar

type TCDToolBar = class(TCDControl)

protected

  FTBState: TCDToolBarStateEx;

  function GetControlId; override;

  procedure CreateControlStateEx; override;

  procedure PrepareControlStateEx; override;

  procedure MouseMove(); override;

  procedure MouseDown(); override;

  procedure MouseUp(); override;

  procedure MouseLeave; override;

public

  constructor Create(); override;

  destructor Destroy; override;

  function InsertItem();

  function AddItem();

  procedure DeleteItem();

  function GetItem();

  function GetItemCount;

  function GetItemWithMousePos();

  function IsPosInButton();

published

  property ShowCaptions: Boolean; [rw]

  property DrawStyle: TCDDrawStyle;

end;

TCDToolBar

TCDControl

TCustomControl

The base class for windowed controls which paint themselves.

TWinControl

Implements a windowed control which can contain other child controls.

TControl

The base class for visible controls.

TLCLComponent

The base class for LCL components which have an associated widget.

TComponent,IUnknown,IInterfaceComponentReference

TPersistent,IFPObserved

TObject