Einzelnen Beitrag anzeigen

Benutzerbild von Cosamia
Cosamia

Registriert seit: 27. Feb 2007
Ort: Emmendingen
221 Beiträge
 
Delphi 2007 Professional
 
#1

showModelessDialog im TWebBrowser

  Alt 26. Apr 2013, 15:23
Hallo zusammen,

ich habe mal wieder eine Frage an euch.
Auf einer Webseite welche ich mit TWebBrowser aufrufe, wird ein Webseiten Dialog mit folgendem Code aufgerufen:

Code:
F1 = window.showModelessDialog(urlstr,window,features);
Den Aufruf dieses Dialogs gilt es jetzt zu bemerken und zu reagieren.

Code:
 htmlwindow :IHTMLWindow2;
 htmlDoc : IHTMLDocument2;


 htmlDoc := WebBrowser1.Document as IHTMLDocument2;
 htmlwindow := IHTMLWindow2(htmlDoc.parentWindow);

 htmlwindow.window.showModelessDialog := (TEventObject.Create(New_Dialog) as IDispatch);
Jetzt kennt IHTMLWindow2 leider kein showModelessDialog.

Jemand eine Idee wie ich das öffnen des Dialogs mitbekommen kann?

Vielen Dank.
  Mit Zitat antworten Zitat