Vcl.Controls.TControl.BeginDrag

De RAD Studio API Documentation
Aller à : navigation, rechercher

Delphi

procedure BeginDrag(Immediate: Boolean; Threshold: Integer = -1);

C++

void __fastcall BeginDrag(bool Immediate, int Threshold = 0xffffffff);

Propriétés

Type Visibilité  Source Unité  Parent
procedure
function
public
Vcl.Controls.pas
Vcl.Controls.hpp
Vcl.Controls TControl

Description

Commence le glissement d'un contrôle.

Appelez la méthode BeginDrag pour commencer une opération de déplacement. BeginDrag est appelée dans le code d'une application uniquement quand la valeur de la propriété DragMode du contrôle est égale à dmManual. Si DragMode est à dmAutomatic, BeginDrag est appelée automatiquement.

Si le paramètre Immediate a la valeur true, le pointeur de la souris utilise la valeur spécifiée par la propriété DragCursor et le glissement commence immédiatement. Si Immediate a la valeur false, le pointeur de la souris ne change pas et le glissement ne commence que lorsque l'utilisateur déplace la souris sur une courte distance (du nombre de pixels spécifiés par Threshold). Si l'appelant transmet une valeur Threshold inférieure à 0 (telle que la valeur par défaut de ce paramètre), BeginDrag utilise la propriété DragThreshold de la variable globale Mouse.

L'initialisation de Immediate à false permet au contrôle d'accepter les clics de la souris sans commencer d'opération glisser-déplacer ou glisser-ancrer.

Voir aussi