Vcl.ActnMenus.TCustomMenuButton.DragOver
Delphi
procedure DragOver(Source: TObject; X: Integer; Y: Integer;
State: TDragState; var Accept: Boolean); override;
C++
DYNAMIC void __fastcall DragOver(System::TObject* Source, int X, int Y, System::Uitypes::TDragState State, bool &Accept);
Properties
| Type | Visibility | Source | Unit | Parent |
|---|---|---|---|---|
procedure function |
protected | Vcl.ActnMenus.pas Vcl.ActnMenus.hpp |
Vcl.ActnMenus | TCustomMenuButton |
Description
Is an OnDragOver event dispatcher.
After calling the TCustomActionControl.DragDrop inherited method, DragOver manages the submenus of the action control, and executes Click, if it is selected.
DragOver sets the Accept parameter to True to indicate that the user can drop the dragged object on the action control. It sets Accept to False to indicate that the user cannot drop the dragged object on the action control.
The Source parameter is the object being dragged.
The State parameter indicates how the dragged object is moving in relation to the control.
X and Y indicate the current position of the mouse.