[Overview][Constants][Types][Classes][Procedures and functions][Index] Reference for unit 'StdCtrls' (#lcl)

TCustomButton

[Properties (by Name)] [Methods (by Name)] [Events (by Name)]

TCustomButton - the base class for TButton and TBitBtn

Declaration

Source position: stdctrls.pp line 1043

type TCustomButton = class(TButtonControl)

protected

  procedure Click; override;

  

Click - a procedure that allows the programmer to simulate a mouse click over the control, and initiates the same Action as that associated with the OnClick event

  procedure CreateWnd; override;

  

Creates the Window

  procedure ControlKeyDown(); override;

  

ControlKeyDown - contains the set of special keys (shift, control, alt, meta) that are pressed

  procedure ControlKeyUp(); override;

  

ControlKeyUp - contains the set of special keys (shift, control, alt, meta) that are not pressed ('up')

  procedure SetParent(); override;

  

Find who the parents are and store the information

  function DialogChar(); override;

  

DialogChar - a LCL Key Message; returns True if a Dialog character has an associated message

  function ChildClassAllowed(); override;

  

ChildClassAllowed - returns True if the given child class is permitted

  function GetControlClassDefaultSize; override;

  

Find the default size for this class of controls (by reference to parents)

  property ParentColor;

  

ParentColor - should the control have the same colour as the parent? Default is true

  procedure WSSetDefault;

  

WSSetDefault - writes the default widget set to local variable

  procedure WSSetText(); override;

  

WSSetText - writes the text name of the widget set to a local variable

  procedure TextChanged; override;

  

Procedure to deal with changes in text

public

  constructor Create(); override;

  procedure ExecuteDefaultAction; override;

  

What to do when the RETURN button is pressed, signifying default action

  procedure ExecuteCancelAction; override;

  

What to do when ESCAPE is hit (or the CANCEL button is selected) - signifying CANCEL

  procedure ActiveDefaultControlChanged(); override;

  

The active default control has changed to NewControl

  procedure UpdateRolesForForm; override;

  

Update the roles for this form; see whether there have been any changes in its role

  function UseRightToLeftAlignment; override;

  

UseRightToLeftAlignment - as opposed to usual left to right

  property Active: Boolean; [rs]

  

Is this control Active - has it got Focus; is the mouse over it?

  property Default: Boolean; [rw]

  

Is this the Default button? (default setting is False)

  property ModalResult: TModalResult; [rw]

  

Is a Modal Result awaited? (default is false)

  property Cancel: Boolean; [rw]

  

Is this the Cancel button? (default setting is False)

  property Color;

  

Determine the colour for the current control

  property TabStop;

  

Is the control in the sequence of controls accessed by successive presses of the Tab key?

end;

Inheritance

TCustomButton

  

TCustomButton - the base class for TButton and TBitBtn

|

TButtonControl

  

TButtonControl : ancestor class for several Button (including Radio Button) and Check Box classes

|

TWinControl

  

TWinControl - the base class for all windowed controls

|

TControl

  

TControl - the main ancestor class for visual controls.

|

TLCLComponent

?

TObject