Advertisement
Combreal

getRegKeyValue.iss

May 20th, 2020
2,194
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Pascal 0.50 KB | None | 0 0
  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;
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement