[j8r60]

как правильно в этом коде прописать реестр

Код:

function InitializeSetup: Boolean; 
 var 
  path: string; 
  res: Integer; 
begin 
  Result:= True; 
  if RegValueExists(HKLM, 'Software\Что нужно указать', 'InstallPath') then 
    if RegQueryStringValue(HKLM, 'Software\Что нужно указать', 'InstallPath', path) then 
      if FileExists(path + '\xrEngine.exe') then 
  if MsgBox('Запустить S.T.A.L.K.E.R. - Чистое Небо?', mbConfirmation, MB_YESNO) = IDYES then 
    begin 
      Exec(path + '\xrEngine.exe', '', '', SW_SHOW, ewWaitUntilTerminated, res); 
      Result:= False; 
    end 
  else Result:= False; 
end;