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.