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

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

Аватара для Dodakaedr

Ветеран


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

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


Цитата 292944028:
Вопрос пока остается открытым, может кто нибудь еще может помочь? »
Как такой вариант?
Скрытый текст
Код: Выделить весь код
[setup]
AppName=test
AppVerName=test
OutputDir=.
DefaultDirName={pf}\test

[Components]
Name: tst; Description: unins.exe; 
Name: tst2; Description: setup.exe;

[code]
function FileExist(FName: string): boolean;
begin
  result := FileExists(AddBackslash(ExpandConstant('{app}'))+fname);
end;

procedure CurPageChanged(CurPageID: Integer);
begin
  if CurPageID = wpSelectComponents then 
  begin
    WizardForm.ComponentsList.ItemEnabled[0] := FileExist('unins000.exe');  //tst
    WizardForm.ComponentsList.ItemEnabled[1] := FileExist('setup.exe');     //tst2
    WizardForm.ComponentsList.Checked[0] := FileExist('unins000.exe');      //tst
    WizardForm.ComponentsList.Checked[1] := FileExist('setup.exe');         //tst2
  end;
end;

-------
Inno Setup 5 Ultra Unicode

Это сообщение посчитали полезным следующие участники:

Отправлено: 21:14, 14-04-2017 | #1923