Unit 'Controls'	Package
[Overview][Constants][Types][Classes][Procedures and functions][Variables][Index]	[#lcl]

TWinControl.DoDragMsg

Dispatches a drag message, sent by the DragManager.

Declaration

Source position: controls.pp line 2167

protected function TWinControl.DoDragMsg(

ADragMessage: TDragMessage;

APosition: TPoint;

ADragObject: TDragObject;

ATarget: TControl;

ADocking: Boolean

):PtrInt; override;

On dmFindTarget, a TWinControl returns the child control under the mouse, or Self if none is found.

All other messages are handled by the inherited TControl.DoDragMsg method.