Wysyłanie email

W jaki sposób można napisać w Delphi 6 program, który po naciśnięciu przycisku WYŚLIJ, wyśle treść komponentu MEMO1 do adresata podanego w EDIT1 o temacie podanym w EDIT2.
Mam nadziej, że wiecie o co chodzi. :-D

To już było setki razy, ale nie „nabiję” pustego posta.

var
P : PChar;
begin
P := PChar('mailto:[email protected]?Subject=Temat&Body='+
Memo1.Lines.Text);
ShellExecute(Handle,'open',PChar(P), nil, nil, SW_SHOW);
end;

O tym wiem, ale w jaki sposób wysłać email który użytkownik wpisuje wmail do jakiegoś edit`a oraz temat. ??

O tym wiem, ale w jaki sposób wysłać email który użytkownik wpisuje wmail do jakiegoś edit`a oraz temat. ??

Nie umiesz ruszyc glowa?? oczekujesz gotowych rozwiazan?

USES Shellapi

var
P : PChar;
begin
P := PChar('mailto:'+Edit1.Text+'?Subject='+Edit2.Text+'&Body='+
Memo1.Lines.Text);
ShellExecute(Handle,'open',PChar(P), nil, nil, SW_SHOW);
end;

Zmeczylbys sie od wymyslenia takiego rozwiazania?
Ja wzialem skopiowalem kod ktory napisal ci Marco i dodalem tylko te edity

Nie lepiej skorzystać z komponentu od maili???

nmSMPT [czy jaks tak] + F1

przykładzik poszedł na maila

[cya]

w FAQ są przykłady wysyłania maili przez Indy i FastNet....