Mailto ?

[thomas2009]

Hallo

kennt jemand, wie man eine neue Email als Standard in Internet Explorer einfügen kann?
Ich verwende diesen Code um eine Email to senden :

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
ShellExecute(Handle, 'open', 'mailto:[e-mail]&subject=Email-mit-Delphi&Body=Hallo das ist ein Test nur&Attachment="C:\test.jpg"', nil, nil, SW_SHOW);
end;

Mein Konto in yahoo wird aufgerufen und die Angaben werden auch eingetragen aber das Bild wird nicht angehängt. Ich wollte also den Standard Email ändern vielleicht klappt es

[FAlter]

Hi,

ich denke nicht, dass dein String der richtige Weg ist. Sowas kannst du ggf. in einem HTML.Dokument schreiben, aber selbst da sollte man sich möglichst auf mailto:user@domain beschränken, da das nicht alle Browser mitmachen. Mit ShellExecute klappt es aber noch weniger (siehe Anhang).

Du könntest z. B. JvMail aus der JVCL verwenden. Das kann alles, was du willst. Schon im Objektinspektor - oder eben zur Laufzeit - einstelllbar. Dann einfach JvMail1.SendMail(true); und es wird das Mailprogramm geöffnet - mit deinen Vorgaben. Mein Test hat jefenfalls geklappt.

Mfg
FAlter