Discussion :

[sweetdreamer]

Bonjour, je voudrais savoir s'il est possible d'écrire le texte d'un label sur plusieurs lignes depuis l'éditeur de propriétés en contrôlant les retours à la ligne c'est à dire sans que le retour à la ligne ne soit imposé par la taille du texte.

[Matt2094]

le caractère chr(13) indique le retour à la ligne. Ajoute-le dans ton texte à l'endroit que tu veux.

[ALWEBER]

Par programme tu peux faire

Code :

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

Label1.Caption := 'A'#13#10'B'

[Pedro]

Par programme tu peux faire

Code :

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

Label1.Caption := 'A'#13#10'B'

Ce serait plutôt:

Code :

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

1
2
 
Label1.Caption := 'A'+#13+#10+'B';

[ALWEBER]

Les deux marchent très bien !

[Pedro]

Les deux marchent très bien !

Tu as parfaitement raison. Je ne le savais pas Merci de me l'avoir signalé

[ALWEBER]

Ce code marche aussi dans la vue de la fiche en mode texte

Code :

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

1
2
3
4
5
6
7
8
 
  object Label1: TLabel
    Left = 136
    Top = 32
    Width = 32
    Height = 13
    Caption = 'Labe'#13'l1'
  end

[Arkal]

Ou bien tu mets autosize à False et autoFetch à true et tu positionne ton label comme tu veux...

[sweetdreamer]

Je crois que le mode ecriture depuis la fiche vue comme texte me convient comme solution mais j'étais persuadé que c'était possible depuis l'éditeur de propriétés. Enfin merci à tous.

[DMO]

Juste à titre informatif, il existe une constante utilisable à la place de #13#10 : c'est bien evidemment "pareil" mais plus propre.

Code :

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

1
2
3
4
5
6
unit System;
 
(...)
 
const
  sLineBreak = {$IFDEF LINUX} #10 {$ENDIF} {$IFDEF MSWINDOWS} #13#10 {$ENDIF};