Einzelnen Beitrag anzeigen

Benutzerbild von Sourcemaker
Sourcemaker

Registriert seit: 3. Sep 2003
Ort: Westoverledingen
261 Beiträge
 
Delphi XE5 Professional
 
#7

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

  Alt 22. Dez 2009, 10:43
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
Frank
  Mit Zitat antworten Zitat