Mam pytanko... Jest jakaś komenda, która w prosty sposób otworzy domyślny program pocztowy i nowy list na konkretny adres (takie coś jak w HTML mailto:adres mniej więcej)?
Wysyłanie maili było już tu poruszane, ale na inny sposób... tzn. jak samemu obsłużyć wysyłanie maila, a mi to nie jest potrzebne...
0
0
uses ShellApi;
procedure TForm1.WyslijClick(Sender: TObject);
var
P : PChar;
begin
if Edit1.Text='' then
begin
ShowMessage('Wpisz adres');
end else begin
P := PChar('mailto:[email protected]?Subject=Temat&Body=Tu jest text maila');
ShellExecute(Handle,'open',PChar(P), nil, nil, SW_SHOW);
end;
0
Adam, wiem że Ci się nie chce, ale zaglądaj czasem do FAQ