So sendest Du über Standard Mail Client ohne Fenster.
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
s:
String;
begin
s := '
mailto:MaxMuster@mann.de';
s := s + '
?Subject=Delphi-PRAXiS';
s := s + '
&Body=Inhalt';
s := s + '
&Attach=""C:\TestDate.txt""';
ShellExecute(
handle, '
open', PChar(s),
nil,
nil, SW_SHOWNORMAL);
end;