Discussion :

[Yvan_F1]

Bonjour

Delphi 2007

Je dois créer un mail en insérant le contenu d'un fichier HTML.
Il y a un fichier HTML modèle contenant des zones de texte à remplacer.
Ces zones sont formatées comme cela : [/Texte\]

En premier je charge ce fichiers dans un TStringList, ensuite j’aimerais remplacer ces zones avant de l’envoyer dans le mail.
par exemple :

La zone : [/ADDRESS\] doit être remplacé par :
Jean-Pierre Ducoin
Avenue des loutres 34
1000 Lausanne
…

Lorsque je remplace le texte [ADDRESS], le texte remplaçant vient de cette manière :

Jean-Pierre Ducoin Avenue des loutres 34 1000 Lausanne …

Les sauts de lignes sont perdus.

J’utilise simplement la fonction ReplaceStr.

En utilisant un éditeur HTML, on voit que pour chaque ligne, tout une codification est insérée.

Quelqu'un peut m'aider.

A savoir que je n'ai jamais travaillé du HTML.

Merci

[ShaiLeTroll]

les sauts de ligne en HTML c'est <BR>

tu peux faire ceci par exemple

Code :

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

1
2
3
4
5
 
SL := TStringList.Create();
SL.Text := Adresse;
SL.LineBreak := '<BR>';
HTML := StringReplace(HTML, '[ADDRESS]', SL.Text, []);

ou

Code :

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

1
2
3
HTML := StringReplace(HTML, '[ADDRESS]', 
           StringReplace(Adresse, #13, '<BR>' [rfReplaceAll]),
           [rfReplaceAll]);

J'ai fait aussi un système de merge mais avec du RTF, un grand classique

[Yvan_F1]

Splendide !
Comme le dis le titre Simple et efficace !
Merci aussi pour le lien.

[Paul TOTH]

outre le fait que tu devrais cliquer sur "résolu", je suis assez bluffé de voir qu'un développeur de nos jours peu encore ignorer ce qu'est une balise HTML

[benymypony]

outre le fait que tu devrais cliquer sur "résolu", je suis assez bluffé de voir qu'un développeur de nos jours peu encore ignorer ce qu'est une balise HTML

C'est quoi l'HTML ? (Humour)

Beny