ActiveX-DLL zum Zugriff auf die Registry unter Vista/W7

[Sourcemaker]

Danke Luckie,

das hat mir in Bezug auf die grundsätzliche ActiveX-Implementierung weitergeholfen.

Allerdings hänge ich bei Deklaration der Methode/Funktion:

Delphi-Quellcode:

function NewCoGetObject(pazName: PWideChar; pBindOptions: PBindOpts3;
         const iid: TIID; out ppv): HResult; stdcall; external 'ole32.dll'
         name 'CoGetObject';

function CoCreateInstanceAsAdmin(WndHandle: HWND; clsid: TCLSID;
    iid: TIID; out ppv): HRESULT;
var
    Bo      : TBindOpts3;
    Moniker : PWideChar;
begin
    Moniker := PWideChar(WideString('Elevation:Administrator!new:' +
                                    GuidToString(clsid)));
    FillChar(Bo, SizeOf(Bo), #0);
    Bo.hwnd           := WndHandle;
    Bo.cbStruct       := SizeOf(Bo);
    Bo.dwClassContext := CLSCTX_LOCAL_SERVER;
    Result            := NewCoGetObject(Moniker, @Bo, iid, ppv);
end;

Ich muß CoCreateInstanceAsAdmin in der Typ-Bibliothek angeben finde aber nicht die richtigen Parametertypen am wenigsten für "out ppv".

Eine Idee ?

Gruß

Frank