Discussion :

[looping]

Bonjour,

j'ai reussi à programmer un envoi de mail avec pièce jointe en utilisant Indy 10
Le corps du mail est du texte simple que l'utilisateur rentre dans un composant Tmémo.
Tous fonctionne bien mais j'aimerais maintenant pouvoir envoyer des mails au format RTF. Le corps du message sera saisie dans un Trichedit.

Quelle est la meilleur méthode pour passer au RTF. Il faut obligatoirement passer par une conversion HTML ou bien il ya un autre moyen ?

merci

[mick605]

Salut

Pour obtenir le texte au format RTF, tu doit passer par un stream intermédiaire :

Code :

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

1
2
3
4
5
6
7
var St : TStringStream;
begin
  St:=TStringStream.Create('');
  RichEdit1.Lines.SaveToStream(St);
  Showmessage(St.DataString);
  St.Free;
end;

Laisse la propriété PlainText de ton richedit a false. Tu obtiendra un truc du genre :

Code :

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

1
2
3
4
{\rtf1\ansi\ansicpg1252\deff0\deflang1036{\fonttbl{\f0\fnil Tahoma;}}
\viewkind4\uc1\pard\f0\fs16 RichEdit1
\par 
\par }

Bonne chance