enviar correo electronico desde delphi

05-05-2010

radenf

Miembro

Registrado: oct 2007

Ubicación: Viña del Mar,Chile

Posts: 608

Poder: 19

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

« Tema Anterior | Próximo Tema »

Normas de Publicación
no Puedes crear nuevos temas no Puedes responder a temas no Puedes adjuntar archivos no Puedes editar tus mensajes El código vB está habilitado Las caritas están habilitado Código [IMG] está habilitado Código HTML está deshabilitado

Saltar a Foro

Temas Similares
Tema	Autor	Foro	Respuestas	Último mensaje
Enviar un correo electronico desde delphi 7	carlos gonzalez	Varios	3	07-06-2008 18:04:29
Enviar correo electrónico desde delphi	luisneria	Internet	3	02-03-2007 18:07:27
Enviar correo electronico mediante MAPI	adebonis	API de Windows	3	12-10-2006 08:38:25
Fallo al enviar correo electrónico	User_Baja_2	Internet	1	04-02-2006 23:54:34
Script Para Enviar Correo Electronico	mel_618	PHP	2	11-10-2004 10:07:36

La franja horaria es GMT +2. Ahora son las 16:22:29.