Discussion :

[fred64]

Bonjour à tous,

voila mon problème.

Admettons que j'ai un fichier externe avec toutes les chaines de mon interface (Les caption des boutons, etc, etc).

Si je veux modifier dynamiquement la caption d'unTLabel avec une chaine pas de problème.

Code :

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

1
2
3
4
5
var
     MaChaine: string;
begin
    MaChaine := 'Un beau bouton';
    Bouton1.Caption := MaChaine;

Si je veux avoir un caption multiligne, pas de pb non plu :

Code :

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

1
2
3
4
5
var
     MaChaine: string;
begin
    Ma Chaine := 'Un beau'#10#13'bouton';
    Bouton1.Caption := MaChaine;

Mais j'ai un problème lorsque je veux modifier caption avec un chaine extraite d'un fichier externe qui doit comprendre des sauts de ligne : Comment les faire figurer ?

Dans mon fichier externe, j'ai par exemple :

TEXT = 'Un beau\n\nbouton';

mais ca ne marche pas evidemment,

quelqu'un à t'il la solution ?

Merci d'avance,

Fred

[denokan]

pourquoi ne pas remplacer les "\n" par des #10#13 avant de les affecter aux captions avec AnsiReplaceStr ?

[fred64]

Effectivement cela marche ,

je n'avais pas testé car je pensais que cela n'allait pas fonctionner et me substituer les caractères '\n' par '#10#13' au lieu de remplacer par des sauts de ligne,

merci beaucoup,


Fred

[TicTacToe]

juste pour info

#13 devrait suffire

et sinon c'est #13#10 et non #10#13