Имя пользователя:
Пароль:
 

Показать сообщение отдельно

Пользователь


Сообщения: 76
Благодарности: 1

Профиль | Отправить PM | Цитировать


наконец то......... целую ночь провозился, с этой кажись - такой мелочью.

CODE
Код: Выделить весь код
[Setup]
AppName=TEST1 
AppVerName=TEST2 
OutputDir=userdocs:..\desktop
CreateAppDir=no
Uninstallable=no

[*Code]
function InitializeSetup(): Boolean; var 
    FileName: String;  
  begin
    FileName:=ExtractFilePath(ExpandConstant('{reg:HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\IEXPLORE.EXE,Path}'));
      if not FileExists((FileName)+('Internet Explorer\iexplore.exe')) then
    Result:=True
  else
    MsgBox((FileName)+'Internet Explorer' #13''#13 'Папка  Установки  При  Обновлении !', mbInformation, MB_OK);
end;

[Files]
//Source: "userdocs:..\desktop\TEST.exe"; DestDir: "{app}"; Flags: ignoreversion


Теперь другов вопрос, как его этот путь "(FileName)+'Internet Explorer'", сохранить в например в дириктиву #define, или например в {app} неважно куда и как важно чтобы в (DestDir) каталог установки брался автоматом, так как пишеться апдейт а не полноценный софт.

Последний раз редактировалось Beavimo, 18-02-2020 в 10:19.


Отправлено: 04:43, 18-02-2020 | #563