Programmpfad anderer Programme ermitteln

[Andreas L.]

Delphi-Quellcode:

uses ..., Registry;

...
...

function GetPath:String;
var
  reg: tregistry;
begin
  Result := '';
  reg := Tregistry.create;
  reg.root := HKEY_LOCAL_MACHINE;
  if reg.openkeyreadonly('Software\Microsoft\Windows\CurrentVersion\Uninstall\DEINAPPNAME') then
  begin
    Result := reg.readstring('InstallLocation');
  end;
  reg.free;
end;

So z. B.