Das Programm wurde eventuell nicht richtig installiert.

[Bjoerk]

Programm Setup.exe wird als Admin ausgeführt (mit Mainfest {$R ...res}),
Uninstaller ist installiert und eingetragen.

Delphi-Quellcode:

var
  Reg: TRegistry;
begin
  Reg:= TRegistry.Create;
  try
    with Reg do
    begin
      RootKey:= HKey_LOCAL_MACHINE;
      OpenKey('SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\' + FProgApp.Key, true);
      WriteString('InstallLocation', FNachVerz);
      WriteString('DisplayIcon', FNachVerz + FProgApp.EXE);
      WriteString('DisplayName', FProgApp.Name);
      WriteString('DisplayVersion', FProgApp.VersionStr);
      WriteString('Publisher', 'XXXX Software');
      WriteString('URLInfoAbout', 'http://www.XXXX-software.de');
      WriteString('UninstallString', FVerzA + FProgApp.UnInst);
      WriteInteger('NoModify', 1);
      WriteInteger('NoRepair', 1);
      closeKey;
    end;
  finally
    Reg.Free;
    XXXXZertifikatAnlegen(FNachVerz, false);
  end;
end;