DWF viewer COM automation ?

[HPW]

Hallo,

Ich versuche das DWF-viewer 7 ActiveX von autodesk in delphi zu benutzen.
Ich bekomme das ActiveX importiert und es läuft soweit in der Testanwendung.

Ich habe aber keine Erfahrung mit der COM automation,
daher weiss ich nicht wie ich die events der ActivX nutzen kann:

Zum Beispiel möchte ich den Object-Namen eines Object anzeigen:

Delphi-Quellcode:

procedure TForm1.CExpressViewerControl1SelectObject(ASender: TObject;  const pIAdPageObjectNode, pHandled: IDispatch); 
begin 
  Label1.Caption :=  ????; 
end;

Die autodesk Dokumentation hat leider nur ein VB6 Beispiel:

Delphi-Quellcode:

Private Sub CExpressViewerControl1_OnSelectObject(ByVal pIAdPageObjectNode As Object, ByVal pHandled As Object) 
    Dim strResult As String 
    Dim objPageObjectNode As EPlotRenderer.IAdPageObjectNode 
    Dim tHandled As AdCommon.CAdToggle 

    'First parameter : piAdPageObjectNode 
    Set objPageObjectNode = pIAdPageObjectNode 
    strResult = "Object node name is " + objPageObjectNode.Name 
    lstLog.AddItem (strResult) 

    'Second parameter : pHandled 
    Set tHandled = pHandled 
    tHandled.State = True 
    strResult = "Selected object shouldn't be highlighted (in yellow)" 
    lstLog.AddItem (strResult) 
End Sub

Hat jemand einen Tip wie das in delphi gemacht wird?