Delphi-PRAXiS - Delphi Html Emails + Listbox

erklär mir das bitte mal jemand, wenn ich das so mache dann wird eine html email versendet. in memo1.text steht der html-source

Delphi-Quellcode:

			 for i := 0 to (Listbox1.items.count - 1) do

      Listbox1.items[i] := extractfilepath(application.exename) + edit13.text;

     sendNewsLetter(an, Listbox1.items, memo1.text, 'test@www.de', 'Test', 'mpnormal', 'text/html', 'mail.server.com', 'user', 'pass', 25, 0);

wenn so dann werden keine html emails versendet, kommen nur als text an.

Delphi-Quellcode:

			edit13.Text:=worddocname + xdatuma + '.doc';

 files := Tstringlist.Create;

 f:=edit13.text;

 files.Add(f); // TString einen Wert zuweisen

    sendNewsLetter(an, files, memo1.text, 'test@www.de', 'Test', 'mpnormal', 'text/html', 'mail.server.com', 'user', 'pass', 25, 0);