Był podany przykład:
var
P : PChar;
begin
P := PChar('mailto:[email protected]?Subject=Temat&Body='+
Memo1.Lines.Text);
ShellExecute(Handle,'open',PChar(P), nil, nil, SW_SHOW);
Jak wysłać dokument przygotowany w HTML-u?
Był podany przykład:
var
P : PChar;
begin
P := PChar('mailto:[email protected]?Subject=Temat&Body='+
Memo1.Lines.Text);
ShellExecute(Handle,'open',PChar(P), nil, nil, SW_SHOW);
Jak wysłać dokument przygotowany w HTML-u?
Zapisuj do P tekst z tagami HTML (, ...itp)
mozesz tez otwierac HTML i zapisywac go do zmiennej i wysyłać
Tak ale nie spowoduje to wyświetlania HTMLa po odebraniu przez kogoś maila... zobaczy on po prostu wszystkie tagi, jakby to był zwykły tekst. Zresztą całkiem niedawno był tu post na ten temat - poszukaj.
Przez parametr w ShellExecute chyba nie idze ustawić Content-Type na text/html...