Vcl.Controls.TBaseDragControlObject.Finished
Delphi
procedure Finished(Target: TObject; X, Y: Integer; Accepted: Boolean); override;
C++
virtual void __fastcall Finished(System::TObject* Target, int X, int Y, bool Accepted);
Propriétés
Type | Visibilité | Source | Unité | Parent |
---|---|---|---|---|
procedure function |
protected | Vcl.Controls.pas Vcl.Controls.hpp |
Vcl.Controls | TBaseDragControlObject |
Description
Finished termine un glisser-déplacer.
Finished est automatiquement appelée quand l'utilisateur dépose le contrôle ou annule le glissement. Accepted précise si le contrôle Target situé à la position X, Y accepte l'opération glisser-déplacer ou glisser-arrimer. Si une cible n'accepte pas l'objet déplacé, sa méthode DragCanceled est appelée avant que la méthode EndDrag ne génère un événement OnEndDrag.