¿Cómo mostrar al frente (y no en el fondo) un nuevo formulario de correo electrónico en Outlook con OLE?
Estoy usando OLE con Delphi para comunicarme desde mi aplicación de Delphi a Outlook.
Abrí el nuevo formulario de correo electrónico en Outlook con el siguiente código. El problema es que el formulario está en segundo plano, por lo que si el formulario desde el que estoy generando el formulario de correo electrónico está maximizado, "cubrirá" el nuevo formulario de correo de Outlook.
¿Cómo puedo hacer que ese formulario aparezca en la parte superior? (no "pegado en la parte superior", sino simplemente que aparece en la parte superior, entonces un usuario puede imitarlo si lo desea).
Este es el código:
try
OutlookApp := GetActiveOleObject('Outlook.Application');
except
OutlookApp := CreateOleObject('Outlook.Application');
end;
try
MailItem := OutlookApp.CreateItem(olMailItem);
MailItem.To := '[email protected]';
MailItem.Subject := 'This is the subject';
MailItem.HTMLBody := '<HTML>Test</HTML>';
MailItem.Display;
finally
OutlookApp := VarNull;
end;
end;