Vcl.Controls.TDragObject.GetDragCursor

• Up to Parent: TDragObject

Delphi

function GetDragCursor(Accepted: Boolean; X, Y: Integer): TCursor; virtual;

C++

virtual System::Uitypes::TCursor __fastcall GetDragCursor(bool Accepted, int X, int Y);

Properties

Type	Visibility	Source	Unit	Parent
function	protected	Vcl.Controls.pas Vcl.Controls.hpp	Vcl.Controls	TDragObject

Description

Indicates which cursor should be displayed in response to mouse moves.

When the mouse is moved, GetDragCursor is called automatically. The Accepted parameter indicates whether the object under the mouse accepts the drag. The X and Y parameters represent the current position of the mouse. The TCursor value returned by GetDragCursor is used to indicate the current drag cursor.

GetDragCursor returns crDrag to when Accepted is true, crNoDrop otherwise.

See Also

• DragCursor