Discussion :

[philnext]

Bonjour,
Je cherche un composant (ou autre) qui fournisse le résultat d'une string 'codée' avec la syntaxe du Pascal.
Bon je m'explique :
Si ma string (dans un fichier texte par exemple) est sous la forme

Code :

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

'C''est un test'+#13+'avec des résultats'

Je voudrait avoir en retour la string :

Code :

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

1
2
C'est un test
avec des résultats

OK ce n'est pas très compliqué à faire...mais ça doit bien exister non ?

[Rayek]

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
 
var
  lst : TStringList;
  i : integer;
begin
  lst := TStringList.Create;
  try
    lst.LoadFromFile('[LE FICHIER TEXTE]');
    // au cas où le #13 ne soit pas bien interprété
    lst.text := StringReplace(lst.text,'#13,'#13#10,[rfReplaceAll]);
    lst.text := StringReplace(lst.text,'+',''[rfReplaceAll]);
    for i := 0 to lst.count -1 do
      lst[i] := AnsiExtractQuotedStr(lst[i]);
 
    Showmessage(lst.text);
  finally
    lst.free;
  end;
end;

[philnext]

Merci pour la réponse mais..bon je ne me suis pas fait comprendre.
Je n'ai pas de problème particulier pour gérer l'exemple que j'ai donné mais je voudrais un analyseur de syntaxe qui sache gérer tous les cas de figures notamment différencier :
'ceci est un exemple' + #13+#10 +'avec des caractères non affichables'
'ceci est un exemple' + #13 +'avec des caractères non affichables'
'ceci est un exemple' + #10 +'avec des caractères non affichables'
aussi gérer les doubles cotes...

[sjrd]

J'ai codé StrRepresToStr qui fait ce que tu veux

(à la relire je me rends compte qu'elle manque un peu de commentaires, celle-là )

[philnext]

Merci je regarde...