[Neftali [Germán.Estévez]]

Empezado por Durbed

...Queria saber como se puede ejecutar el cliente de correo de windows desde una aplicacion delphi y que te ponga directamente en la pantalla de componer el e-mail y que la direccion del destinatario la ponga el.

Prueba con éste código, no te puedo asegurar que funcione en todos los clientes; Un form con un Botón (recuerda añadir ShellAPI al usues) y en OnClick del botón pones lo siguiente:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
 
  // Función para enviar mail
  function SendEMail(Recipient, Subject, Body: string): HINST;
  var
    MailMsg: string;
  begin
    // Comando
    MailMsg := Format('mailto:%s?subject=%s&body=%s',
                                 [Recipient, Subject, Body]);
    // Ejecutar
    Result := ShellExecute(Application.Handle,
                                       'open',
                                       PChar(MailMsg),
                                       nil, nil,
                                       SW_SHOWNORMAL);
  end;
var
  R,S,B:String;
begin
  // Configurar
  R := 'alguien@hotmail.com';
  S := 'Lo que me pediste...';
  B := 'Cuerpo del mensaje';
  // Bloque de proteccion
  try
    SendEMail(r, s, b);
  except;
    // Captura de errores del envio
  end;
end;