Link in mailbody einfügen (mapi)

[Berni68]

Hallo zusammen,

mit der Funktion sendemail (hier aus der DP) kann man ja eine email an das Standard-email-Programm (hier Thunderbird) übergeben.

Code:

procedure TForm1.Button1Click(Sender: TObject);
var
  mail: TStringList;
  s: string;
begin
  mail:= TStringList.Create;
  try
    mail.values['to']:= '[e-mail]';
    mail.values['subject']:= 'TestLink';
    s:=              'Zeile 1';
    s:= s + #13#10 + 'http://www.delphipraxis.net';   // <- Problem
    s:= s + #13#10 + 'Zeile 3';
    mail.values['body']:= s;   
    sendEMail(Application.Handle, mail);
  finally
    mail.Free;
  end;
end;

Wie muss man welche Steuerzeichen einbauen, dass (in Thunderbird)
http://www.delphipraxis.net als LINK erscheint???
Hier in der DP geht das sinnvollerweise automatisch