AutoitX dispinterface

  • Halo an Alle,
    brauche bitte Hilfe mit dispinterface, bzw. mit dem Auslesen des Errocodes aus dem Eventobjekt.
    Die MsgBox reagiert auf die Events, aber leider ohne die benoetigten Errocodes.
    Die Suche hat mir keinen entscheidenden Hinweis geboten, daher waere ich fuer ein Tip sehr dankbar.
    MfG Ed


    Spoiler anzeigen
    [autoit]

    ;=======================================================================================
    ;...Auszug aus der IDL
    ;=======================================================================================
    helpstring("_IXDLLEvents-Ereignisschnittstelle")
    ]
    dispinterface _IXDLLEvents {
    properties:
    methods:
    [id(0x00000001), helpstring("method Transfer")]
    HRESULT Transfer([in] VARIANT data);
    [id(0x00000002), helpstring("method Error")]
    HRESULT Error([in] unsigned char ErrorCode);

    [/autoit] [autoit][/autoit] [autoit]

    };
    ;========================================================================================
    ;...Auszug aus VBA(Funktioniert)
    ;========================================================================================
    Private Sub xd_Error(ByVal ErrorCode As Byte)
    MsgBox ErrorCode
    End Sub
    ;========================================================================================
    ;...Hier Schnipsel in Autoit(mit MsgBox gehts, aber ohne ErrorWert)
    ;========================================================================================
    Global $Obj = ObjCreate("XDLL.HauptInterface")
    $evnts=ObjEvent($Obj,"_Event_")

    [/autoit] [autoit][/autoit] [autoit]

    Func _Event_Error()
    MsgBox (0,"", "Error",3)
    EndFunc

    [/autoit]

    - MfG OpaEd

    Einmal editiert, zuletzt von opaed (13. Oktober 2009 um 18:21)

  • Und das geht nicht?

    [autoit]

    Func _Event_Error($error)
    MsgBox (0,"", "Error",$error)
    EndFunc

    [/autoit]
  • Danke euch,
    @progandy danke fuer die Hilfe, ich war schon echt am verzweifeln, dabei war es so einfach :thumbup:
    Event_Error in $errorCode laden und ueber MsgBox ausgeben. Koennte echt in die Wand springen.
    Mal sehen ob die anderen Events aus der IDL auch funktionieren.

    Spoiler anzeigen
    [autoit]


    Func _Event_Error($errorCode)
    MsgBox (0,"", $errorCode,3)
    EndFunc

    [/autoit]

    - MfG OpaEd