Combreal

getRegKeyValue.iss

May 20th, 2020
1,584
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. [Code]
  2. function InitializeSetup: Boolean;
  3. var path: String;
  4. begin
  5.   if RegValueExists(HKEY_LOCAL_MACHINE,'Software\Microsoft\Windows\CurrentVersion\Uninstall\{#MyAppId}_is1', 'QuietUninstallString') then
  6.     begin
  7.       RegQueryStringValue(HKEY_LOCAL_MACHINE,'Software\Microsoft\Windows\CurrentVersion\Uninstall\{#MyAppId}_is1', 'QuietUninstallString', path);
  8.       MsgBox(ExpandConstant(path), mbInformation, MB_OK);
  9.       Result := True;
  10.     end
  11.   else
  12.     begin
  13.       Result := True;
  14.     end
  15. end;
RAW Paste Data