| Class TTimeEdit (unit DateEdt) |
TCustomEdit
| Constructors |
constructor Create(AOwner: TComponent);| Functions |
destructor Destroy;
procedure UpdateEdit;
procedure CreateParams(var Params: TCreateParams);
procedure CreateWnd;
procedure DoEnter;
procedure DoExit;
procedure KeyPress(var Key: Char);
function ValidateTime: TDateTime;
function GetDateElement(Index: integer): integer;
function IsValidChar(Pos: word; Key: char): boolean;
procedure SetDateElement(Index: integer; Value: integer);
procedure SetEditTime(Value: TDateTime);
procedure SetEmptyChar(Value: char);
procedure SetInternational(Value: boolean);
procedure SetLeadingZero(Value: boolean);
procedure SetSeparator(Value: Char);
procedure SetUseCurrentTime(Value: boolean);| Properties |
property AutoSelect :
property AutoSize :
property BorderStyle :
property Color :
property Ctl3D :
property DragCursor :
property DragMode :
property EmptyChar : char
property Enabled :
property Font :
property Hours : integer
property International : Boolean
property LeadingZero : Boolean
property Minutes : integer
property ParentColor :
property ParentCtl3D :
property ParentFont :
property ParentShowHint :
property PopupMenu :
property ReadOnly :
property Separator : Char
property ShowHint :
property TabOrder :
property TabStop :
property UseCurrentTime : Boolean
property Visible :
property EditTime : TDateTime| Events |
event OnClick :
event OnDblClick :
event OnDragDrop :
event OnDragOver :
event OnEndDrag :
event OnEnter :
event OnExit :
event OnKeyDown :
event OnKeyPress :
event OnKeyUp :
event OnMouseDown :
event OnMouseMove :
event OnMouseUp : | Variables |
FEditTime : TDateTime;
FEmptyChar : Char;
FInternational : Boolean;
FLeadingZero : Boolean;
FSelText : PChar;
FSeparator : Char;
FUseCurrentTime : Boolean;
TOList : TList;| Constructors |
constructor Create(AOwner: TComponent);------------------------- TTimeEdit-class ------------------------------
| Functions |
destructor Destroy;
procedure UpdateEdit;
procedure CreateParams(var Params: TCreateParams);
procedure CreateWnd;
procedure DoEnter;+1 is workaround for windows paint bug
procedure DoExit;
procedure KeyPress(var Key: Char);
function ValidateTime: TDateTime;
function GetDateElement(Index: integer): integer;
function IsValidChar(Pos: word; Key: char): boolean;
procedure SetDateElement(Index: integer; Value: integer);
procedure SetEditTime(Value: TDateTime);
procedure SetEmptyChar(Value: char);
procedure SetInternational(Value: boolean);
procedure SetLeadingZero(Value: boolean);
procedure SetSeparator(Value: Char);
procedure SetUseCurrentTime(Value: boolean);| Properties |
property AutoSelect :
property AutoSize :
property BorderStyle :
property Color :
property Ctl3D :
property DragCursor :
property DragMode :
property EmptyChar : char
property Enabled :
property Font :
property Hours : integer
property International : Boolean
property LeadingZero : Boolean
property Minutes : integer
property ParentColor :
property ParentCtl3D :
property ParentFont :
property ParentShowHint :
property PopupMenu :
property ReadOnly :
property Separator : Char
property ShowHint :
property TabOrder :
property TabStop :
property UseCurrentTime : Boolean
property Visible :
property EditTime : TDateTime| Events |
event OnClick :
event OnDblClick :
event OnDragDrop :
event OnDragOver :
event OnEndDrag :
event OnEnter :
event OnExit :
event OnKeyDown :
event OnKeyPress :
event OnKeyUp :
event OnMouseDown :
event OnMouseMove :
event OnMouseUp : | Variables |
FEditTime : TDateTime;
FEmptyChar : Char;
FInternational : Boolean;
FLeadingZero : Boolean;
FSelText : PChar;
FSeparator : Char;
FUseCurrentTime : Boolean;
TOList : TList;