Invocando al programa de correo predeterminado para enviar un email(Copyright © 2001 Ernesto D'Spirito convertido a C++Builder by _Willa)
Puede invocar la ventana "Nuevo Mensaje" o "Componer Mensaje" del programa de correo electrónico predeterminado usando la función API ShellExecute declarada en la unidad ShellApi, simplemente pasándole 'mailto:' como tercer parámetro (lpFile), tal como se muestra aquí:
void __fastcall TForm1::Button1Click(TObject *Sender)
{
ShellExecute(Handle, NULL, "mailto:", NULL, NULL, SW_NORMAL);
}
También puede agregar la dirección de email del destinatario:
void __fastcall TForm1::Button1Click(TObject *Sender)
{
ShellExecute(Handle, NULL,"mailto:latium@latiumsoftware.com", NULL, NULL,
SW_NORMAL);
}
Incluso se puede incluir una línea de asunto:
void __fastcall TForm1::Button1Click(TObject *Sender)
{
ShellExecute(Handle, NULL,"mailto:latium@latiumsoftware.com?Subject=Test"
, NULL, NULL, sW_NORMAL);
}
Y hasta el texto del mensaje:
void __fastcall TForm1::Button1Click(TObject *Sender)
{
ShellExecute(Handle, NULL,
"mailto:latium@latiumsoftware.com?Subject=Test&Body=Just testing the example",
NULL, NULL, SW_NORMAL);
}
En definitiva, esta es una forma fácil de invocar al correo, e incluso se puede ampliar con un poco de imaginación "el texto del mensaje", asignandole el contenido de un RichEdit, Memo, ...
Tambien se puede asignar al Click de un TLabel de tal forma que cuando se pulse con el raton encima del .Caption, se invoque a la función Shell... correspondiente.
Salu2
_Willa