TCheckComboBoxEx

type TCheckComboBoxEx = class(TCustomEditButton)

protected

  procedure ButtonClick; override;

  procedure CloseUp;

  function CreateBuddy; override;

  procedure CreateHandle; override;

  procedure DoAutoAdjustLayout(); override;

  procedure DoEnter; override;

  procedure DoChange; virtual;

  procedure DoItemChange(); virtual;

  procedure DoCloseUp; virtual;

  procedure DoDropDown; virtual;

  procedure DoItemClick(); virtual;

  procedure DoOnShowHint(); override;

  procedure EditKeyDown(); override;

  function GetBuddyClassType; override;

  function GetEditorClassType; override;

  procedure InvalidateButton; virtual;

  procedure RestoreInitialChecks;

  procedure SaveInitialChecks;

  procedure SetBiDiMode(); override;

  procedure ShowPopup;

  procedure UpdateCaption;

public

  constructor Create(); override;

  destructor Destroy; override;

  function AddItem();

  procedure CheckAll();

  procedure Clear;

  procedure Toggle();

  property Checked []: Boolean; [rw]

  property DroppedDown: Boolean; [r]

  property ItemEnabled []: Boolean; [rw]

  property Text;

published

  property AllowGrayed: Boolean; [rw]

  property AutoDropDown: Boolean; [rw]

  property ButtonWidth: Integer; [rw]

  property Delimiter: char; [rw]

  property DropDownCount: Integer; [rw]

  property DropDownImageIndex: TCheckComboBoxExImageIndex; [rw]

  property EscCancels: Boolean; [rw]

  property HintMode: TCheckComboBoxHintMode; [rw]

  property Images: TCustomImageList; [rw]

  property ImageWidth: Integer; [rw]

  property ItemIndex: Integer; [rw]

  property Items: TStrings; [rw]

  property ItemWidth: Integer; [rw]

  property Sorted: Boolean; [rw]

  property OnChange: TNotifyEvent; [rw]

  property OnCloseUp: TNotifyEvent; [rw]

  property OnDropDown: TNotifyEvent; [rw]

  property OnItemChange: TCheckItemChange; [rw]

  property OnItemClick: TCheckListClicked; [rw]

  property Align;

  property Anchors;

  property AutoSize;

  property BiDiMode;

  property BorderSpacing;

  property Color;

  property Constraints;

  property DragCursor;

  property DragKind;

  property DragMode;

  property Enabled;

  property Font;

  property Hint;

  property ParentBidiMode;

  property ParentColor;

  property ParentFont;

  property ParentShowHint;

  property PopupMenu;

  property ShowHint;

  property Spacing;

  property TabOrder;

  property TabStop;

  property TextHint;

  property Visible;

  property OnChangeBounds;

  property OnClick;

  property OnContextPopup;

  property OnDblClick;

  property OnDragDrop;

  property OnDragOver;

  property OnEndDrag;

  property OnEnter;

  property OnExit;

  property OnKeyDown;

  property OnKeyPress;

  property OnKeyUp;

  property OnMouseDown;

  property OnMouseEnter;

  property OnMouseLeave;

  property OnMouseMove;

  property OnMouseUp;

  property OnStartDrag;

end;

TCheckComboBoxEx

TObject