| Class TDragDrop (unit MGDrgDrp) |
TComponent
| Constructors |
constructor Create(AOwner:TComponent);| Functions |
procedure ClearList;
destructor Destroy;
procedure HookParent;Call TComponent's default destroy meathod
procedure HookWndProc(var Message: TMessage);
procedure SetActive(YesNo:Boolean);
procedure UnhookParent;| Properties |
property Active : Boolean
property BringToFront : Boolean
property DroppedFiles : TStringList| Events |
event OnFilesDropped : TFilesDropped| Variables |
FActive : Boolean;
FBTF : Boolean;
FFilesDropped : TFilesDropped;
FList : TStringList;
NewWndProc : Pointer;
OldWndProc : TFarProc;| Constructors |
constructor Create(AOwner:TComponent);Protected declarations
| Functions |
procedure ClearList;Add the item
destructor Destroy;Activate (or don't) the capturing of WM_DROPFILES
procedure HookParent;Accept drops at all?
Call TComponent's default destroy meathod
procedure HookWndProc(var Message: TMessage);
procedure SetActive(YesNo:Boolean);
procedure UnhookParent;Install Hook
| Properties |
property Active : Boolean
property BringToFront : Boolean
property DroppedFiles : TStringList| Events |
event OnFilesDropped : TFilesDropped| Variables |
FActive : Boolean;Bring to front?
FBTF : Boolean;Store dropped files
FFilesDropped : TFilesDropped;Define Event
FList : TStringList;Field Variables
NewWndProc : Pointer;
OldWndProc : TFarProc;Proc Pointers