Enviar email en HTML con ShellExecute a outlook.

[jlrdz]

Buenos días primero que nada a todos, tengo una duda y espero me puedan ayudar a responderla:

Tengo un string que lleno para enviar un mail a outlook mediante ShellExecute, el envío lo hace correctamente:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
Var MailString:String;
begin
            MailString := 'mailto: correo@correo.com';
            MailString := MailString + '?Subject=Mensaje de prueba';
            MailString := MailString + '&Body= Hola, este es un mensaje de prueba...';
            ShellExecute(Self.Handle, nil, pChar(MailString), nil, nil, SW_NORMAL);
end;

Pero si lo quiero enviar con formato HTML ya no logro hacer que me lo haga de esa manera, he intentado agregarle la cabecera de Content-Type: text/html pero no funciona, me lo envía a outlook como si fuera texto plano y me ignora las etiquetas HTML.

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
Var MailString:String;
begin
            MailString := 'mailto: correo@correo.com';
            MailString := MailString + '?Subject=Mensaje de prueba';
            MailString := MailString + '&Content-Type = text/html &Body=
Hola, este es un mensaje de prueba
'  ;
            ShellExecute(Self.Handle, nil, pChar(MailString), nil, nil, SW_NORMAL);
end;

¿Tienen alguna idea de qué estoy haciendo mal?

Saludos y gracias de antemano.

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

Creo que para esto tienes que utilizar las Indy.

HTML messages
Sending HTML Messages with Indy
O este otro...

[jlrdz]

Empezado por Neftali

Creo que para esto tienes que utilizar las Indy.

HTML messages
Sending HTML Messages with Indy
O este otro...

Gracias por tu respuesta y sí, he usado ese para enviarlos directamente desde la aplicación pero lo que se necesita es que el usuario pueda editar el correo antes de enviarlo por eso lo mando a outlook primero pero bueno le daré una leída a los enlaces que me haz enviado.

[rhesius]

Pudiste resolver esto de que la app de correo te tome el html?