Me parece que lo solucione de esta forma, por ahora no me han llamado:
Código Delphi
[-]
Msg := 'Existe un Documento Activo en el View PDF';
MessageBox(Handle, PChar(Msg), PChar('Information'), MB_OK + MB_ICONINFORMATION);
vHandle := FindWindow(nil, 'Information');
if vHandle <> 0 then
SetForegroundWindow (vHandle);