4D v16.3

Clickcount

Accueil

 
4D v16.3
Clickcount

Clickcount 


 

Clickcount -> Résultat 
Paramètre Type   Description
Résultat  Entier long in Nombre de clics consécutifs

La commande Clickcount retourne, dans le contexte d'un événement clic, le nombre de fois que l'utilisateur a cliqué de manière répétée avec le même bouton de la souris. Typiquement, la commande retourne 2 pour un double-clic.

Cette commande vous permet notamment de détecter des double-clics dans les en-têtes ou les pieds des list box, et également de gérer des séquences de triple-clics ou plus.

Chaque clic avec un bouton de la souris génère un événement clic séparé. Par exemple, si un utilisateur effectue un double-clic, un événement est généré pour le premier clic, dans lequel Clickcount retourne 1 ; puis un autre événement est généré pour le second clic, dans lequel Clickcount retourne 2.

Cette commande peut uniquement être appelée dans le contexte de l'événement formulaire On Clicked, On Header Click ou On Footer Click . Par conséquent, il est nécessaire de vérifier en mode Développement que l'événement correspondant a bien été sélectionné dans les propriétés du formulaire et/ou pour l'objet concerné.

Lorsque les deux événements formulaire On Clicked et On Double Clicked sont activés, la séquence suivante est retournée par Clickcount :

  • 1 dans l'événement On Clicked
  • 2 dans l'événement On Double Clicked
  • 2+n dans l'événement On Clicked

La structure de code suivante peut être placée dans un en-tête de list box pour gérer les clics simples et les double-clics :

 Case of
    :(Form event=On Header Click)
       Case of
          :(Clickcount=1)
             ... //simple clic
          :(Clickcount=2)
             ... //double clic
       End case
 End case

Les libellés ne sont pas saisissables mais ils peuvent le devenir après un triple-clic. Si vous souhaitez permettre aux utilisateurs de modifier les libellés, vous pouvez écrire la méthode objet suivante :

 If(Form event=On Clicked)
    Case of
       :(Clickcount=3)
          OBJECT SET ENTERABLE(*;"Label";True)
          EDIT ITEM(*;"Label")
    End case
 End if

 
PROPRIÉTÉS 

Produit : 4D
Thème : Evénements formulaire
Numéro : 1332

 
HISTORIQUE 

Créé : 4D v14 R5

 
UTILISATION DE L'ARTICLE

4D - Langage ( 4D v16)
4D - Langage ( 4D v16.1)
4D - Langage ( 4D v16.2)
4D - Langage ( 4D v16.3)