Vcl.ActnMenus.TCustomMenuButton.DragOver

Aller au parent : TCustomMenuButton

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);

Propriétés

Type	Visibilité	Source	Unité	Parent
procedure function	protected	Vcl.ActnMenus.pas Vcl.ActnMenus.hpp	Vcl.ActnMenus	TCustomMenuButton

Description

Répartiteur d'événements OnDragOver.

Après avoir appelé la méthode TCustomActionControl.DragDrop héritée, DragOver gère les sous-menus du contrôle d'action, et exécute Click, si elle est sélectionnée.

DragOver définit le paramètre Accept sur True pour indiquer que l'utilisateur peut déposer l'objet glissé sur le contrôle d'action. Elle définit Accept sur False pour indiquer que l'utilisateur ne peut pas déposer l'objet glissé sur le contrôle d'action.

Le paramètre Source est l'objet en cours de glissement.

Le paramètre State indique comment l'objet glissé est déplacé par rapport au contrôle.

X et Y indiquent la position actuelle de la souris.