Einzelnen Beitrag anzeigen

marabu

Registriert seit: 6. Apr 2005
10.109 Beiträge
 
#2

Re: Pfad zu registriertem OCX ermitteln

  Alt 8. Sep 2007, 08:38
Herzlich willkommen in der Delphi-PRAXiS, Michael.

Die ActiveX-Controls werden im Registry-Pfad HKCR\TypeLib verwaltet. Du musst für den Zugriff den GUID und die Version kennen:

Delphi-Quellcode:
function GetOcxPath(const guid: TGuid; const version: string): string;
var
  key: string;
begin
  with Registry.TRegistry.Create(KEY_READ) do
  try
    RootKey := HKEY_CLASSES_ROOT;
    key := Format('TypeLib\%s\%s\0\win32', [SysUtils.GuidToString(guid), version]);
    if OpenKey(key, False)
      then Result := ReadString('')
      else Result := '';
  finally
    Free;
  end;
end;

// ShowMessage(GetOcxPath(LIBID_AcroPDFLib, '1.0'));
Freundliche Grüße
  Mit Zitat antworten Zitat