Rotina para enviar e-mail pelo Delphi

Delphi

09/05/2008

Olá!

Necessito de um código para enviar e-mail pelo Delphi. Pode ser apenas uma rotina simples, que quando o usuário clicar no endereço de e-mail, este abra o programa de e-mail padrão instalado. Ou então, pode ser um outro mais sofisticado.

No aguardo.


Bielisilva

Bielisilva

Curtidas 0

Respostas

Rm

Rm

09/05/2008

Pesquise sobre componente indy

Veja este tópico

http://forum.devmedia.com.br/viewtopic.php?t=90626&highlight=indy


GOSTEI 0
Dedi

Dedi

09/05/2008

800 dicas tem esta rotina pra chamar o programa padrão de email.

//216 - Chamar um e-mail pelo Delphi
//Uses Shellapi
procedure TForm1.Button1Click(Sender: TObject);
 var Mail : String;
begin
 Mail := ´mailto:lloydsoft@ieg.com.br´;
 ShellExecute(GetDesktopWindow,´open´,pchar,Mail),nil,nil,sw_ShowNormal);
end;



GOSTEI 0
Bielisilva

Bielisilva

09/05/2008

Valeu Dedi, funcionou!


GOSTEI 0
Helio Nascimento

Helio Nascimento

09/05/2008

Dedi

Neste seu tem como colocar o assunto e o endereço e nome do anexo?

Obrigado/Hélio


GOSTEI 0
Massuda

Massuda

09/05/2008

[quote:a02b6f8147=´Helio Nascimento´]Neste seu tem como colocar o assunto e o endereço e nome do anexo?[/quote:a02b6f8147]

:arrow: http://forum.devmedia.com.br/viewtopic.php?t=83578


GOSTEI 0
Luizito

Luizito

09/05/2008

Se vc quiser enviar email pelo delphi ae vai :

http://www.usercontrol.net/content/view/15/18/

Abraço.


GOSTEI 0
POSTAR