PDA

Ver la Versión Completa : Como escribir algo en el Asunto cuando se envia un email por codigo delphi


JoAnCa
24-03-2009, 14:35:39
Hola a todos
En mi programa delphi, al hacer clic en la direccion de email, me abre el cliente de correo con la direccion puesta, lo hago de esta forma


ShellExecute(GetDesktopWindow(), nil, pChar('mailto:' + TLabel(Sender).Caption), nil, nil, SW_SHOWNORMAL);


Pero tambien quisiera que se me escribiera automaticamente algo en el asunto, y de ser posible que el cursor se ponga en el cuerpo del mensaje, listo para redactar.

Neftali [Germán.Estévez]
24-03-2009, 15:57:16
Un pequeño cambio...


ShellExecute(GetDesktopWindow(), nil,
pChar('mailto:' + TLabel(Sender).Caption+'?subject=Asunto...'), nil, nil, SW_SHOWNORMAL);

JoAnCa
24-03-2009, 16:04:00
Muchas gracias Neftali, funcionó perfecto :D:D