[Overview][Types][Classes][Index] | Reference for unit 'CustomDrawnControls' (#lcl)

# TCDEdit

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

## Declaration

Source position: customdrawncontrols.pas line 193

`type TCDEdit = class(TCDControl)`
`protected`
`FEditState: TCDEditStateEx;` |  |
`function GetControlId; override;` |  |
`procedure CreateControlStateEx; override;` |  |
`procedure RealSetText(); override;`
`procedure DoChange; virtual;`
`procedure DoEnter; override;` |  |
`procedure DoExit; override;` |  |
`procedure KeyDown(); override;` |  |
`procedure KeyUp(); override;` |  |
`procedure UTF8KeyPress(); override;` |  |
`procedure MouseDown(); override;` |  |
`procedure MouseMove(); override;` |  |
`procedure MouseUp(); override;` |  |
`procedure MouseEnter; override;` |  |
`procedure MouseLeave; override;` |  |
`public`
`constructor Create(); override;` |  |
`destructor Destroy; override;` |  |
`function GetCurrentLine;`
`procedure SetCurrentLine();`
`property LeftTextMargin: Integer; [rw]` |  |
`property RightTextMargin: Integer; [rw]` |  |
`function GetSelStartX;`
`function GetSelLength;`
`procedure SetSelStartX();`
`procedure SetSelLength();`
`property CaretPos: TPoint; [rw]`
`published`
`property Align: TAlign;` |  |
`property Anchors: TAnchors;` |  |
`property AutoSize: Boolean;` |  |
`property Color: TColor;` |  |
`property DrawStyle: TCDDrawStyle;` |  |
`property Enabled: Boolean;`
`property Lines: TStrings; [rw]`
`property MultiLine: Boolean; [rw]`
`property PasswordChar: Char; [rw]`
`property ReadOnly: Boolean; [rw]`
`property TabStop: Boolean;` |  |
`property Text: string; [rws]` |  |
`property OnChange: TNotifyEvent; [rw]`
`end;`

## Inheritance

`TCDEdit` |  |
`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`
?
`TObject`