Discussion :

[gibbe]

Bonjour,
j'ai un état quick report avec delphi7 dans lequel il faut que je dessine des lignes verticales pour séparer les champs de la bande rbdetail (affichage en tableau). J'ai positionné des qrshape avec la propriété shape à qrsvertline. J'ai des champs plus long que mes colonnes affichés sur plusieures lignes avec la propriété autostrech. La bande rbdetail a donc une hauteur variable et je n'arrive pas à adapter la hauteur des lignes verticales à la hauteur de la bande. Si je leur affecte une grande hauteur, le pied de groupe et le pied de page s'imprime correctement par dessus ces lignes en les masquant mais elles réapparaissent en bas de la page, dans les marges de la page. Il n'est pas possible de jouer avec la marge inférieure car l'état peut être imprimé sur différentes imprimantes.
Dans un tel cas comment procédez-vous? Existe-t-il un objet que je n'ai pas vu qui gèrerait tout ça? Sinon est-il possible d'obtenir la hauteur de la bande avant l'impression et d'affecter cette valeur à la hauteur des lignes verticales? Ou faut-il essayer de positionner le pied de page une fois que l'imprimante a été choisie par l'utilisateur?

[anapurna]

salut

dans le onbefore de la bande

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
     QRShape.SIZE.Top := 0;
     QRShape.SIZE.Height := QrBand1.Size.Height;

@+ Phil

[gibbe]

Merci pour ta réponse.
Cela me donne malheureusement la hauteur initiale de la bande, mais ca ne prend pas en compte les retours à la ligne effectués par l'autostretch des QrDbRichText. Il manque de la hauteur sur toutes les lignes concernées!

Une autre idée?

[SergioMaster]

est-ce que tes shapes sont bien créés en dernier

[gibbe]

Même avec une shape rajoutée en dernier l'effet est le même.
J'ai essayé aussi de calculer la hauteur de bande avec le dbRichtext.height puis le dbrichtext.size.height, mais que ce soit beforeprint ou afterprint cela ne prend pas en compte la hauteur rajoutée par les sauts de ligne.

[newbie57]

Bonjour,

Comme gibbe j'ai exactement le même problème avec la hauteur de mes QRShapes dans ma bande (QRSubDetail) et comme gibbe, la hauteur de mes Shapes ne change pas en fonction des retours à la ligne de ma QRDBText

J'ai essayé de voir tous les evenements possibles de ma QRSubDetail / QRDBText.. mais aucune valeur ne change durant la création de mon report.

Par ordre chronologique les evenements suivants se déclenchent:
- QRSubDetailBeforePrint
- QRDBTextPrint
- QRSubDetailAfterPrint
puis ça recommence en fonction du nombre d'enregistrements dans ma Bdd.

Comment faites-vous pour que cela fonctionne chez vous?

PS: Pour info, j'ai BDS2006, QR4.0 et j'utilise un preview personnalisé.

Merci pour votre aide

[SergioMaster]

je ne sais pas si j'ai été clair

par dernier je ne voulais pas dire au moment du dessin du quickrep mais qu'il fallait faire en sorte que ceux-ci soit les derniers a être dessinés
(mettre en arrière plan)

[gibbe]

Merci pour l'idée. En arrière plan ou pas ça ne fait pas de différence.

Après des heures de recherche j'ai enfin trouvé une solution:
La seule propriété qui change est la propriété expanded de la bande détail. Si la bande est normale expanded vaut 0, si la bande est redimensionnée à cause de l'autostretch d'un composant enfant elle prend la valeur de la nouvelle hauteur de la bande. Malheureusement cette propriété n'est pas à jour beforeprint, elle est seulement disponible afterprint. J'ai donc rempli un tableau de valeurs dans le afterprint qui se rempli quand j'appelle le prepare du quickreport (J'en profite aussi pour récupérer à la fin du prepare la propriété qrspagenumber d'un QRsysdata qui me donne le nombre total de page de l'état et qui permet ensuite d'afficher sur chaque page "Page N°/Nb pages"). Dans le beforeprint j'affecte la hauteur de chaque ligne avec la valeur mémorisée dans mon tableau soit max(qrbanddetail.height,round(qrbanddetail.Expanded)). La fonction max fait partie de l'unité math qu'il faut rajouter dans le uses. La hauteur à modifier est la proprieté height de la Qrshape (et pas qrshape.size.height).

Le tour est joué, ca marche!
Merci à tous.

[evarisnea]

Le tour est joué, ca marche!
Merci à tous.

il ne faut pas utiliser le smiley résolu (), mais cliquer sur le bouton résolu en bas à gauche pour marquer la discussion comme telle