Como escribir algo en el Asunto cuando se envia un email por codigo delphi

[JoAnCa]

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

Código Delphi [-]
  
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]]

Un pequeño cambio...

Código Delphi [-]
ShellExecute(GetDesktopWindow(), nil, 
pChar('mailto:' + TLabel(Sender).Caption+'?subject=Asunto...'), nil, nil, SW_SHOWNORMAL);

[JoAnCa]

Muchas gracias Neftali, funcionó perfecto