Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Servers (https://www.clubdelphi.com/foros/forumdisplay.php?f=9)
-   -   enviar correo electronico desde delphi (https://www.clubdelphi.com/foros/showthread.php?t=67759)

morfeo21 04-05-2010 23:07:31

enviar correo electronico desde delphi
 
hola a todos amigos del foro. Tengo una inquietud; aun no conosco bien los componentes de la paleta server .
pues veran tengo en interbase una tabla de clientes en la cual tengo entre sus datos el corro electronico.
lo que pretendo e enviar un mensaje a los clientes que yo seleccione atraves de microsoft outlook. si me pudieran ayudar con un ejemplo les agradecería mucho:o

radenf 05-05-2010 01:23:01

A lo mejor este código te puede servir

Código Delphi [-]
procedure TForm1.Edit1DblClick(Sender: TObject);
begin
ShellExecute(GetDesktopWindow(), nil, 
pChar('mailto:' + TLabel(Sender).Caption+'?subject=Mensaje de su Programador'), nil, nil, SW_SHOWNORMAL);
end;

donde Edit1 es donde aparece la dirección de correo a quien quieres enviar tu email.

Salu2

Neftali [Germán.Estévez] 05-05-2010 13:21:22

Si quieres hacerlo utilizando las indy, si no recuerdo mal, en las demos viene un ejemplo que muestra cómo hacerlo.

En el FTP del Club, en la sección de ejemplos, hay varios sobre cómo enviar Mails.

morfeo21 05-05-2010 23:21:57

Gracias por la inmediata respuesta radenf voy a poner en practica lo que me aconsejas .


La franja horaria es GMT +2. Ahora son las 13:14:16.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi