4D Doc Center : PV Lire hauteur ligne

4D View v14

PV Lire hauteur ligne


PV Lire hauteur ligne ( zone ; ligne ) -> Résultat

Paramètre	Type	Description
zone	Entier long	Zone 4D View
ligne	Entier long	Numéro de ligne
Résultat	Entier	Hauteur de la ligne

Description

La commande PV Lire hauteur ligne retourne la hauteur en pixels de la ligne numéro ligne.

Exemple 1

Reportez-vous à l’exemple de la commande PV FIXER LARGEUR COLONNES.

Depuis la version 2004.5 de 4D, la commande Imprimer ligne permet d'imprimer des zones 4D View. En principe, ces zones sont imprimées en hauteur fixe. L'exemple suivant montre comment utiliser les commandes d'impression de 4D et la commande PV Lire hauteur ligne pour faire varier la hauteur d'impression de la zone 4D View en fonction de son contenu.

Voici la méthode du formulaire appelé par la commande Imprimer ligne :

 Si(Evenement formulaire=Sur impression corps)

    LIRE RECT OBJET(zone4DView;$gauche;$haut;$droit;$bas)

    $postaquet:=Lire taquet impression(Corps formulaire)

    $hauteurzone:=$bas-$haut

    $nouvhauteur:=calculTaille4DView

  ` calcultaille4DView retourne la hauteur de la zone 4D View en fonction de son contenu

  ` cette méthode est présentée ci-dessous

    $décalage:=$nouvhauteur-$hauteurzone

    DEPLACER OBJET(zone4DView;0;0;0;$décalage)

    FIXER TAQUET IMPRESSION(Corps formulaire;$postaquet+$décalage)

 Fin de si

La méthode calcultaille4DView est la suivante :

 $zone:=PV Creer zone hors ecran

 PV BLOB VERS ZONE($zone;[Table 1]View_)

 PV EXECUTER COMMANDE($zone;pv cmd édition dernière cellule)

 PV LIRE CELLULE COURANTE($zone;$colonne;$ligne)

 $hauteur:=0

 Boucle($i;1;$ligne)

    $hautLigne:=PV Lire hauteur ligne($zone;$i)

    $hauteur:=$hauteur+$hautLigne

 Fin de boucle

 PV SUPPRIMER ZONE HORS ECRAN($zone)

 $0:=Troncature($hauteur*0,75;0)

4D View v14

PV Lire hauteur ligne

PV Lire hauteur ligne

Description

Exemple 1

Exemple 2