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.