webbrowser onnavigatecomplete

[ROMSOM]

Hallo
Ich habe ein Beispiel in MSDN gefunden, den ich nicht in Delphi einsetzen kann. Ich würd mich freuen wenn jemand den richtiegen Weg beschreiben könnte.

http://support.microsoft.com/default...d=kb;de;304643

Über die Variable e ist es scheindbar möglich, ein direkten Zugrif auf eine Instanz von Word zu haben. Das gleiche möchte ich in Delphi realisieren nur hier ist der Procedure-Kopf anders:
OnNavigateComplete(Sender: TObject; const pDisp: IDispatch; var URL: OleVariant);
Kommt man über pDisp an die gestartete Applikation dran? Wenn ja dann wie?

Delphi-Quellcode:

Private Sub AxWebBrowser1_NavigateComplete2(ByVal sender As Object, _
       ByVal e As AxSHDocVw.DWebBrowserEvents2_NavigateComplete2Event) _
       Handles AxWebBrowser1.NavigateComplete2

        On Error Resume Next

        oDocument = e.pDisp.Document

        'Note: You can use the reference to the document object to
        '      automate the document server.
        MsgBox("File opened by: " & oDocument.Application.Name)

End Sub