Vcl.Controls.TDragObject.Finished
Delphi
procedure Finished(Target: TObject; X, Y: Integer; Accepted: Boolean); virtual;
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 | TDragObject |
Description
Répond quand la souris est relâchée, ce qui indique que l'opération glisser-déplacer est achevée.
Finished ne fait rien telle qu'implémentée dans TDragObject. Redéfinissez cette méthode pour proposer un comportement plus significatif. Le paramètre Target indique l'objet ayant accepté le relâchement. Si l'opération déplacement est annulée ou qu'une opération glisser-empiler se termine avec l'objet déplacé dans une position de flottement libre, Target vaut nil (Delphi) ou NULL (C++). X et Y indiquent la position d'achèvement du déplacement. Accepted vaut true si la cible (Target) a accepté l'objet déplacé.
Finished est surchargée et implémentée dans TBaseDragControlObject.