PV FIXER LARGEUR COLONNES

version 6.8

PV FIXER LARGEUR COLONNES (zone; première; dernière; largeur)

La commande PV FIXER LARGEUR COLONNES permet de modifier la largeur (en pixels) des colonnes de zone situées entre les colonnes première et dernière incluses.

Note : Si vous passez 0 (zéro) dans les paramètres première et dernière, la largeur définie sera appliquée à toutes les colonnes de zone et deviendra la nouvelle largeur standard des colonnes de zone. La largeur standard est appliquée notamment lorsque l'utilisateur double-clique sur le séparateur droit d'une colonne.

Cet exemple présente une animation de redimensionnement de lignes et de colonnes :

   C_ENTIER LONG($Colonne;$Ligne)  `Indice de la boucle principale
   C_ENTIER LONG($Largeur;$Hauteur)  `Indice de la boucle d'agrandissement de colonne et ligne
   C_ENTIER LONG($LargeurDépart)  `Largeur de départ de la xième colonne
   C_ENTIER LONG($LargeurDemandée)  `Largeur désirée de la xième colonne

      `Initialisations.
   $LargeurDépart:=5  `Fixons la largeur de départ
   $LargeurDemandée:=$LargeurDépart+5  `10 points de large pour la première colonne

   Boucle ($Colonne;1;5)  `Traitons les cinq premières colonnes
      $Ligne:=$Colonne  `Pour ne traiter que les cinq premières lignes
      Boucle ($Largeur;$LargeurDépart;$LargeurDemandée;2)  `Pour la colonne $Colonne
         $Hauteur:=$Largeur-5  `Mise à jour de la hauteur
         PV FIXER HAUTEUR LIGNES (Zone;$Ligne;$Ligne;PV Lire hauteur ligne(Zone;$Ligne)
                                                   +$Hauteur)  `ligne
         PV FIXER LARGEUR COLONNES (Zone;$Colonne;$Colonne;PV Lire largeur colonne(Zone;
                                                $Colonne)+$Largeur)  `colonne
         PV REDESSINER (Zone)  `Rafraîchissement
      Fin de boucle 
      $LargeurDépart:=$LargeurDemandée  `Pour ne pas commencer au début
      $LargeurDemandée:=$LargeurDemandée+5  `Augmentation pour la prochaine colonne
   Fin de boucle 

PV FIXER HAUTEUR LIGNES, PV Lire largeur colonne.