Class TmdDropFiles (unit mdDrop)

Inherits from

TmdMsgComponent

Constructors


Constructor Create(AOwner : TComponent);

Public declarations

----- Standard functions ------



Functions

Destructor Destroy;


Procedure Loaded;

Set no handle

Procedure Notification(AComponent : TComponent; Operation : TOperation);


Procedure WMDropFiles(Var Msg : TWMDropFiles);

Message received from the TmdMsgComponent

------ Message function(s) ------


Procedure DoFilesDroped;

Protected declarations

------ Event functions ------


Procedure RegisterDrop;

------ Drop functions ------

Procedure UnRegisterDrop;

Make sure that we have a handle to use

Procedure SetAccept(Value : Boolean);


Procedure SetDropWindow(Value : TWinControl);

------ Property functions ------

Properties

property Accept : Boolean


property DropWindow : TWinControl

Published declarations

property Files : TStrings


property Point : TPoint


Events

event OnFilesDroped : TNotifyEvent


Variables

FAccept : Boolean;

Private declarations

FDropWindow : TWinControl;


FFileList : TStrings;


FFilesDroped : TNotifyEvent;


FPoint : TPoint;



Constructors


Constructor Create(AOwner : TComponent);

Public declarations

----- Standard functions ------


Functions


Destructor Destroy;


Procedure Loaded;

Set no handle


Procedure Notification(AComponent : TComponent; Operation : TOperation);


Procedure WMDropFiles(Var Msg : TWMDropFiles);

Message received from the TmdMsgComponent

------ Message function(s) ------


Procedure DoFilesDroped;

Protected declarations

------ Event functions ------


Procedure RegisterDrop;

------ Drop functions ------


Procedure UnRegisterDrop;

Make sure that we have a handle to use


Procedure SetAccept(Value : Boolean);


Procedure SetDropWindow(Value : TWinControl);

------ Property functions ------


Properties


property Accept : Boolean


property DropWindow : TWinControl

Published declarations


property Files : TStrings


property Point : TPoint


Events


event OnFilesDroped : TNotifyEvent


Variables


FAccept : Boolean;

Private declarations


FDropWindow : TWinControl;


FFileList : TStrings;


FFilesDroped : TNotifyEvent;


FPoint : TPoint;