Class TControlSubClass (unit DXClass)

Inherits from

TObject

Constructors


constructor Create(Control: TControl; WindowProc: TControlSubClassEvent);

TControlSubClass


Functions

destructor Destroy;


procedure WndProc(var Message: TMessage);


Properties

Events

Variables

FControl : TControl;


FDefWindowProc : TWndMethod;


FWindowProc : TControlSubClassEvent;



Constructors


constructor Create(Control: TControl; WindowProc: TControlSubClassEvent);

TControlSubClass


Functions


destructor Destroy;


procedure WndProc(var Message: TMessage);


Properties


Events


Variables


FControl : TControl;


FDefWindowProc : TWndMethod;


FWindowProc : TControlSubClassEvent;