Einzelnen Beitrag anzeigen

BullsEye

Registriert seit: 8. Sep 2007
Ort: Werlte
872 Beiträge
 
Delphi 7 Personal
 
#6

Re: Outlook Mail versenden

  Alt 28. Aug 2008, 17:01
Vllt hilft das:

Delphi-Quellcode:
uses ShellApi;

...

procedure TForm1.Button1Click(Sender: TObject);
VAR
  Addy :String;
  Betreff: String;
  Text: String;
begin
Addy := 'test@test.de';
Betreff := 'Ich will dir ne Email schreiben!';
Text := Memo1.Text;

ShellExecute(Application.Handle, 'open',
PChar('mailto:'+Addy+'?subject='+Betreff+'&body='+Text),nil, nil, sw_shownormal);
end;
  Mit Zitat antworten Zitat