Écrire un e-mail au format HTML

**Benoit30** · 02/08/2005, 06h11

Bonjour à tous,

Je suis sous Delphi 3 Professionnel sous Windows XP Professionnel et je n'arrive pas à écrire des e-mails en format HTML correctement.

Voici mon code (très basique vu que je ne fais que commencer le programme):

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
 
procedure TForm1.Button1Click(Sender: TObject);
var
  Destinataire, Sujet, Texte, Email: String;
begin
  Destinataire := 'destinataire@destinataire.com';
  Sujet := 'Test e-mail HTML';
  Texte := '<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">' + chr(13) + chr(10) +
           '<HTML><HEAD>' + chr(13) + chr(10) +
           '<META http-equiv=Content-Type content="text/html; charset=iso-8859-1">' + chr(13) + chr(10) +
           '<META content="MSHTML 6.00.2900.2668" name=GENERATOR>' + chr(13) + chr(10) +
           '<STYLE></STYLE>' + chr(13) + chr(10) +
           '</HEAD>' + chr(13) + chr(10) +
           '<BODY bgColor=#ffffff>' + chr(13) + chr(10) +
           '<DIV>Test e-mail HTML</DIV></BODY></HTML>';
  Email := 'mailto:' + Destinataire + '?subject=' + Sujet+ '&body=' + Texte;
  ShellExecute(Handle,'open',PChar(Email),nil,nil,SW_SHOW);
end;

Cette procédure fait afficher le code HTML comme si c'était du texte. Comment faire pour que ce soit traité comme du HTML et non pas comme du texte? Pour mieux cibler c'est certain que c'est dans le '&body=' + Texte.

Merci à l'avance pour votre réponse!

Balises de code ajoutées par Pierre Castelain.
Pensez-y à l'avenir.

**Bloon** · 02/08/2005, 11h22

Non, c'est dans l'en-tête du message qu'il doit y avoir content-type: text/html; et je ne sais pas si c'est faisable directement en utilisant mailto:

Le mieux serait d'utiliser des composants adaptés (par exemple Indy)

Bloon

**Benoit30** · 02/08/2005, 11h47

Est-ce qu'il existe des composants adaptés gratuits sans aucune restriction?

Je viens de faire l'essai de SMTP/POP3 Email Engine for Delphi (SEE4D) qui fonctionne très bien mais la version sans aucune restriction coûte 105$ US, ce qui n'est vraiment pas donné!

**Bloon** · 02/08/2005, 12h14

Indy est fourni avec Delphi, sinon il y a aussi ICS :

http://www.overbyte.be/frame_index.html

Bloon

**Benoit30** · 02/08/2005, 12h40

Merci beaucoup Bloon!

Indy ne supporte que Delphi 4 et plus alors qu'ICS fonctionne sur toutes les versions de Delphi, je suis donc super content, merci!

Il ne me reste plus qu'à l'explorer pour réussir à faire un client SMTP, ce qui ne devrait pas être trop compliqué.

Écrire un e-mail au format HTML

Composants VCL Delphi

Vue hybride

Discussions similaires

Partager

Partager