Class TMinMax (unit MinMax) |
Inherits from
TCustomControl
constructor Create(AOwner: TComponent);
- Déclarations publiques
destructor Destroy;
Initialize variables
procedure Loaded;
procedure Paint;
Déclarations protégées Always make sure that the hook is removed.
procedure SetBounds(ALeft, ATop, AWidth, AHeight: Integer);
procedure SetParent(Value: TWinControl);
A Parent has been assigned or changed.
procedure HookParent;
This procedure is used to get the parent's window procedure, save it, } { and replace it with our own.
procedure HookWndProc(var Message: TMessage);
The window procedure that is installed into our parent.
procedure UnhookParent;
Remove our window function and reinstall the original.
property MaxPosition : TMinMaxPoint
property MaxSize : TMinMaxPoint
Déclarations publiées
property MaxTrackSize : TMinMaxPoint
property MinTrackSize : TMinMaxPoint
property Options : TMinMaxOptions
FMaxPosition : TMinMaxPoint;
FMaxSize : TMinMaxPoint;
Déclarations privées
FMaxTrackSize : TMinMaxPoint;
FMinTrackSize : TMinMaxPoint;
FOptions : TMinMaxOptions;
NewWndProc : Pointer;
OldWndProc : TFarProc;
constructor Create(AOwner: TComponent);
Déclarations publiques
destructor Destroy;
Initialize variables
procedure Loaded;
procedure Paint;
Déclarations protégées
Always make sure that the hook is removed.
procedure SetBounds(ALeft, ATop, AWidth, AHeight: Integer);
procedure SetParent(Value: TWinControl);
A Parent has been assigned or changed. Unhook old parent and install } { hook in new parent.
procedure HookParent;
This procedure is used to get the parent's window procedure, save it, } { and replace it with our own. This allows see all of the parent's messages } { before it does.
procedure HookWndProc(var Message: TMessage);
The window procedure that is installed into our parent.
procedure UnhookParent;
Remove our window function and reinstall the original.
property MaxPosition : TMinMaxPoint
property MaxSize : TMinMaxPoint
Déclarations publiées
property MaxTrackSize : TMinMaxPoint
property MinTrackSize : TMinMaxPoint
property Options : TMinMaxOptions
FMaxPosition : TMinMaxPoint;
FMaxSize : TMinMaxPoint;
Déclarations privées
FMaxTrackSize : TMinMaxPoint;
FMinTrackSize : TMinMaxPoint;
FOptions : TMinMaxOptions;
NewWndProc : Pointer;
OldWndProc : TFarProc;