Discussion :

[messahel]

Bonjour;
j'ai mis la propriété AutoSize de TQRLabel à false pour obtenir un retour à la ligne mais la propriété Height reste fixé même si TQRLabel contient plus d'une ligne, alors, comment savoir qu'on a un retour à la ligne et si c'est possible de déterminer le nombre des lignes.
Merci beaucoup pour vos aides

[Lung]

mais la propriété Height reste fixé même si TQRLabel contient plus d'une ligne

Pour moi, c'est normal. La hauteur ne va pas varier toute seule.
C'est à toi de fixer la hauteur maximum que le QrLabel peut prendre, ou alors de la faire varier toi-même dans un BeforePrint.

[SergioMaster]

wordwrap := true

[messahel]

les lignes de TQRLabel s'affichent normale quand il y a des retours à la ligne, ce que je cherche c'est, comment savoir si on a un retour à la ligne?
j'ai pensé à la propriété Height pour déterminer le nombre des lignes, mais sa valeur reste fixe (une ligne) quelque soit le nombre des lignes.

[ShaiLeTroll]

AutoSize qui "élargit" le Label horizontalement, tu as bien fait de le mettre à false
Mais cela ne suffit pas !
le WordWrap lui va ajouter des CR lorsque la largeur est insuffisante, mais ne vas pas agrandir le TQRLabel
Il faut lui mettre AutoStretch à true, le contrôle peut alors s'étendre verticalement.

Si cette propriété est à True, les composants monolignes ne s'étendent pas en hauteur.
Pour qu'ils le fassent, définissez AutoSize à False et AutoStretch à True.

[messahel]

Bonsoir ShaileTroll, SergioMaster et Lung;
je n'ai aucun problème avec TQRLabel, il s'étend verticalement et affiche plusieurs lignes lorsque la largeur est insuffisante.
ce que je cherche moi c'est connaitre combien de lignes j'ai dans le TQRLabel? (par un code)

[SergioMaster]

Pourquoi ne pas avoir utilisé un QRMemo alors ? un Lines.Count et le tour aurait été joué .
Il y a plein d'autres possibilités pour calculer le nombre de lignes :
utiliser un TStrings
Compter le nombre de retour à la ligne
etc...
mais ce n'est peut être pas le nombre de lignes que tu cherches , mais la hauteur totale du QRlabel ?

[ShaiLeTroll]

Le TQRLabel n'hérite-t-il pas de Lines du TQRCustomLabel ?
il ne semble même pas utile d'avoir un TQRMemo
Est-elle affecté par le WordWrap ?

Avec un Label VCL

Code :

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

LineCount := Label.Height / -Label.Font.Height;

Semble que Height ne soit pas directement présente dans un TQRLabel, mais le TQRPrintable a une propriété Size qui est un TQRPrintableSize, en théorie

Code :

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

LineCount := QRLabel.Size.Height / -QRLabel.Font.Height;

[messahel]

bonsoir à tous;
la propriété Height est fixé au départ par rapport à une seule ligne,
au cours de l’exécution je modifie le caption de TQRLabel, (si la largeur est insuffisante j'obtiens un retour à la ligne) mais les valeurs des propriétés Height et Size.Height ne se changent plus quelque soit le nombre des lignes.