4D View v15
PV Get row height
PV Get row height
| PV Get row height ( 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 | |||||
La commande PV Lire hauteur ligne retourne la hauteur en pixels de la ligne numéro ligne.
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 :
If(Form event=On Printing Detail)
GET OBJECT RECT(zone4DView;$gauche;$haut;$droit;$bas)
$postaquet:=Get print marker(Form detail)
$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
MOVE OBJECT(zone4DView;0;0;0;$décalage)
SET PRINT MARKER(Form detail;$postaquet+$décalage)
End if- La méthode calcultaille4DView est la suivante :
$zone:=PV New offscreen area
PV BLOB TO AREA($zone;[Table 1]View_)
PV EXECUTE COMMAND($zone;pv cmd edit go to last cell)
PV GET CURRENT CELL($zone;$colonne;$ligne)
$hauteur:=0
For($i;1;$ligne)
$hautLigne:=PV Get row height($zone;$i)
$hauteur:=$hauteur+$hautLigne
End for
PV DELETE OFFSCREEN AREA($zone)
$0:=Trunc($hauteur*0,75;0)
Produit : 4D View
Thème : PV Colonnes & lignes
Numéro :
15951
Modifié : 4D View 2004.5
4D View - Langage ( 4D View v15)
