Fórum Preencher end assunto conteúdo do e-mail via delphi #374070

Olá pessoal do fórum,

estou desenvolvendo uma aplicação em delphi 7 e o cliente me pediu que, em vez de abrir o outlook ou windows Mail pra digitar o end+assunto+corpo da mensagem, ele preenchesse o dados que deseja via aplicativo, em seguida clicaria num botão e ele abrisse o programa de e-mail já com os campos preenchidos.

eu tenho a seguinte função:

var
Mail : String;
begin


if (dbedit18.Text <> ´´) then
begin
Mail := ´Mailto: ´+dbedit18.Text;
ShellExecute(GetDesktopWindow,´open´,pchar(Mail),nil,nil,sw_ShowNormal);
end
else application.MessageBox(´Nenhum endereço de e-mail foi especificado!´+#13+
´´,´Atenção!´,mb_ok+mb_iconexclamation);


end;

mas essa função so abre o e-mail com o destinatário ... não sei como preencher os outros campos ...

Grato amigos, e aguardo sugestões de todos!!!

Abraço