Gracias che, encontré la solución al poco tiempo de postear la inquietud, y justamente lo solucioné de la manera que vos proponés, aunque un poco distinta pero el concepto es el mismo.
Al final definí la funcion showPopupWeb(Appdisp: Idispatch): boolean;
Para poder crear popus o ventanas emergentes desde el main, y opcionalmente desde el mismo popup creado, ya que esto lo requeria la pagina que accedo.(esta funcion se llama desde el
OnNewWindow2 del browser)
Pongo el codigo por si alguien necesita hacer lo mismo, espero les sirva.
Código Delphi
[-]
function showPopupWeb(var appDisp: IDispatch):boolean;
var ThePopup : TFormPopup;
begin
result:= false;
try
ThePopup := TFormPopup.Create(application);
ThePopup.Browser.RegisterAsBrowser:= true;
appDisp := ThePopup.Browser.Application;
ThePopup.show;
result:= true;
except: result:= false
end;
end;