Buscar por:

Envio de e-mails com o delphi (api)

Código

{Exemplo de como fazer sua aplicação enviar e-mails através utilizando API do Windows}

{Declare ShellAPI no Uses}

    email:= 'mailto:seuemail@dominio.com.br';

    email:= email + '?subject= Assunto do Email';

    email:= email + '&body= Corpo da mensagem' ;

    Shellexecute(GetDesktopWindow,'open',pchar(email),nil,nil,sw_shownormal);

Pronto. Não necessita de componentes e não carrega muito o sistema. Esta rotina é só o princípio básico e pode ser incrementada ou alterada de acordo com a necessidade. Pode ser usada para o envio de log de erros ao suporte por exemplo.