Aller au contenu principal
Version: 20 R6 BETA

On Header Click

CodePeut être appelé parDéfinition
42Zone 4D View Pro - List Box - Colonne de List BoxUn clic se produit dans un en-tête de colonne

Description

List Box

Cet événement est généré lorsqu'un clic se produit sur l'en-tête d'une colonne de list box. Dans ce cas, la commande Self vous permet d'identifier l'en-tête de la colonne sur laquelle vous avez cliqué.

Si la propriété Sortable a été sélectionnée pour la list box, vous pouvez décider d'autoriser ou non un tri standard de la colonne en passant la valeur 0 ou -1 dans la variable $0 :

  • Si $0 est égal à 0, un tri standard est effectué.
  • Si $0 est égal à -1, un tri standard n'est pas effectué et l'en-tête n'affiche pas la flèche de tri. Le développeur peut toujours générer un tri de colonne basé sur des critères de tri personnalisés à l'aide du langage 4D.

Si la propriété Sortable n'est pas sélectionnée pour la list box, la variable $0 n'est pas utilisée.

4D View Pro

Cet événement est généré lorsque l'utilisateur clique sur un en-tête de colonne ou de ligne dans un document 4D View Pro. Dans ce contexte, l'objet événement retourné par la commande FORM Event contient :

PropriétéTypeDescription
codeentier long42
Descriptiontext"On Header Click"
objectNametextNom de la zone 4D View Pro
sheetNametextNom de la feuille de l'événement
rangeobjectPlage de cellule
sheetAreaentier longThe sheet location where the event took place:
  • 0: The crossing area between column number/letter headers (top left of the sheet)
  • 1: The column headers (area indicating the column numbers/letters)
  • 2: The row headers (area indicating the row numbers)
  • Exemple

     If(FORM Event.code=On Header Click)
    Case of
    :(FORM Event.sheetArea=1)
    $values:=VP Get values(FORM Event.range)
    :(FORM Event.sheetArea=2)
    VP SET CELL STYLE(FORM Event.range;New object("backColor";"gray"))
    :(FORM Event.sheetArea=0)
    VP SET CELL STYLE(FORM Event.range;New object("borderBottom";\
    New object("color";"#800080";"style";vk line style thick)))
    End case
    End if