TCustomButtonEdit

type TCustomButtonEdit = class(TCustomControl)

protected

  class function GetControlClassDefaultSize; override;

  function CalcButtonVisible; virtual;

  function GetDefaultGlyph; virtual;

  function GetDefaultGlyphName; virtual;

  function GetEditPopupMenu;

  procedure CalculatePreferredSize(); override;

  procedure CheckButtonVisible;

  procedure DoButtonClick(); virtual;

  procedure DoEditDblClick(); virtual;

  procedure DoEditEnter(); virtual;

  procedure DoEditExit(); virtual;

  procedure DoEditTextChange(); virtual;

  procedure Loaded; override;

  procedure SetAutoSize(); override;

  procedure SetColor(); override;

  procedure SetCursor(); override;

  property AutoSelect: Boolean; [rw]

  property AutoSelected: Boolean; [rw]

  property Button: TSpeedButton; [r]

  property ButtonAlign: TButtonAlign; [rw]

  property ButtonCaption: TCaption; [rw]

  property ButtonHint: TTranslateString; [rw]

  property ButtonOnlyWhenFocused: Boolean; [rw]

  property ButtonWidth: Integer; [rw]

  property Color: TColor; [rws]

  property DirectInput: Boolean; [rw]

  property EditMask: string; [rw]

  property Flat: Boolean; [rw]

  property Glyph: TBitmap; [rws]

  property NumGlyphs: Integer; [rw]

  property OnButtonClick: TNotifyEvent; [rw]

  property OnClick: TNotifyEvent; [rw]

  property OnDblClick: TNotifyEvent; [rw]

  property OnDragDrop: TDragDropEvent; [rw]

  property OnDragOver: TDragOverEvent; [rw]

  property OnEditingDone: TNotifyEvent; [rw]

  property OnEndDrag: TEndDragEvent; [rw]

  property OnEnter: TNotifyEvent; [rw]

  property OnExit: TNotifyEvent; [rw]

  property OnMouseDown: TMouseEvent; [rw]

  property OnKeyPress: TKeyPressEvent; [rw]

  property OnKeyUp: TKeyEvent; [rw]

  property OnMouseEnter: TNotifyEvent; [rw]

  property OnMouseLeave: TNotifyEvent; [rw]

  property OnMouseMove: TMouseMoveEvent; [rw]

  property OnMouseUp: TMouseEvent; [rw]

  property OnStartDrag: TStartDragEvent; [rw]

  property OnUtf8KeyPress: TUTF8KeyPressEvent; [rw]

public

  constructor Create(); override;

  destructor Destroy; override;

  procedure Clear;

  procedure ClearSelection; virtual;

  procedure CopyToClipboard; virtual;

  procedure CutToClipboard; virtual;

  procedure PasteFromClipboard; virtual;

  procedure SelectAll;

  procedure SetFocus; override;

  procedure Undo; virtual;

  property Alignment: TAlignment; [rw]

  property CanUndo: Boolean; [r]

  property CaretPos: TPoint; [rw]

  property CharCase: TEditCharCase; [rw]

  property EchoMode: TEchoMode; [rw]

  property HideSelection: Boolean; [rw]

  property MaxLength: Integer; [rw]

  property Modified: Boolean; [rw]

  property NumbersOnly: Boolean; [rw]

  property PasswordChar: char; [rw]

  property PopupMenu: TPopupMenu; [rw]

  property ReadOnly: Boolean; [rw]

  property SelLength: Integer; [rw]

  property SelStart: Integer; [rw]

  property SelText: string; [rw]

  property Text: TCaption; [rw]

  property OnChange: TNotifyEvent; [rw]

end;

TCustomButtonEdit

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

TObject