[insombia]

LinkOFF можно в компоненты наверно только файлы реестра добавить я так думаю

[R.i.m.s.k.y.]

Ну кто-нибудь мне поможет на счет этого Что нужно прописать в скрипте чтоб когда выбираешь компонент в инсталле менялись параметры реестра »

во-1, здесь никто никому не должен
во-2 - может ты это имеешь ввиду?

Код:

[Registry]
Components: Smooth_video_project_cool_things; Root: HKCU; Subkey: Software\Gabest\Media Player Classic; Flags: uninsdeletekey

а можно узнать что вы делаете чтобы ненароком не скачать

[Mafia_forever]

помогите с musicbutton

[Gugle]

Доброго времени суток!
Мне надо, что бы при выборе типа установки (на первой панели), на второй панели была видна или скрывалась одна или несколько строк.

читать дальше »

Код:

[Setup]
AppName=My Program
AppVerName=My Program v.1.2
DefaultDirName={pf}\My Program

[_CODE_]
var
  Page: TWizardPage;
  PageTest: TInputQueryWizardPage;
  ComboBoxLevel: TNewComboBox;
  s: String;

procedure InitializeWizard;
var
  i: Integer;

begin
  { РАЗ }
  Page := CreateCustomPage(wpWelcome, 'Уровень сложности', 'Выберите уровень сложности установки');
  ComboBoxLevel := TNewComboBox.Create(Page);
  ComboBoxLevel.Width := Page.SurfaceWidth;
  ComboBoxLevel.Parent := Page.Surface;
  ComboBoxLevel.Style := csDropDownList;
  ComboBoxLevel.Items.Add('Стандарт');
  ComboBoxLevel.Items.Add('Эксперт');
  ComboBoxLevel.ItemIndex := 0;

  { ДВА }
  PageTest := CreateInputQueryPage(Page.ID, 'Настройки', 
      'ВНИМАНИЕ!', 'Нажмите кнопку "Далее"');
  PageTest.Add('Видим всегда', False);
  PageTest.Add('Видит только эксперт', False);
  PageTest.Values[0] := 'всегда';
  PageTest.Values[1] := 'эксперт';

end;

// обработчик нажатия на клавишу Next
function NextButtonClick(CurPageID: Integer): Boolean;
var
  i: Integer;

begin
  Result := True;

  // Эксперт
  if CurPageID = PageTest.ID then begin
    
    Exit;
  end;
end;

Выложил полуготовый скрипт, что бы понятнее было.
Подскажите, как скрыть текстовые поля на странице PageTest при выборе пользователем разных режимов установки?

[Sollar]

Объясните, почему если из строчки Name: nomer0; Description: Все222; GroupDescription: w; MinVersion: 0,1; Check: isTaskChecked('nomer0'); Components: nomer0; удалить Components: nomer0; то становится видно зависимые задачи у nomer1, если оставить - нет

Код:

[Types]
Name: Ros; Description: Рос
Name: Other; Description: Другое
 
[Components]
;компоненты Другое
Name: nomer0; Description: Все; Types: Other; Flags: disablenouninstallwarning checkablealone;  
Name: ex1; Description: Alcohol52; Types: Other; Flags: disablenouninstallwarning
Name: ex2; Description: BullzipPDFPrinter; Flags: disablenouninstallwarning; Types: Other;  
Name: ex3; Description: FoxitReader; Types: Other; Flags: disablenouninstallwarning;  
;компоненты Рос
Name: nomer1; Description: Все; Types: Ros; Flags: disablenouninstallwarning checkablealone;  
Name: ex4; Description: 7zip; Types: Ros; Flags: disablenouninstallwarning;  
 
[Tasks]
Name: nomer1; Description: Все; GroupDescription: ж; MinVersion: 0,1; Check: isTaskChecked('nomer1'); Components: nomer1;
Name: nomer1; Description: Все; GroupDescription: ж; MinVersion: 0,1; Flags: unchecked; Check: not(isTaskChecked('nomer1')); Components: nomer1;  
 
Name: nomer0; Description: Все222; GroupDescription: w; MinVersion: 0,1; Check: isTaskChecked('nomer0'); Components: nomer0;
Name: nomer0; Description: Все222; GroupDescription: w; MinVersion: 0,1; Flags: unchecked; Check: not(isTaskChecked('nomer0')); Components: nomer0;  
Name: nomer0\Alcohol52; Description: Alcohol52; GroupDescription: w; Components: ex1; MinVersion: 0,1; Check: isTaskChecked('nomer0\Alcohol52');
Name: nomer0\Alcohol52; Description: Alcohol52; GroupDescription: w; Components: ex1; MinVersion: 0,1; Flags: unchecked ; Check: not(isTaskChecked('nomer0\Alcohol52'));  
Name: nomer0\FoxitReader; Description: FoxitReader; GroupDescription: w; Components: ex3; MinVersion: 0,1; Check: isTaskChecked('nomer0\FoxitReader');  
Name: nomer0\FoxitReader; Description: FoxitReader; GroupDescription: w; Components: ex3; MinVersion: 0,1; Flags: unchecked; Check: not(isTaskChecked('nomer0\FoxitReader'));
Name: nomer0\BullzipPDFPrinter; Description: BullzipPDFPrinter; GroupDescription: w; Components: ex2; MinVersion: 0,1; Check: isTaskChecked('nomer0\BullzipPDFPrinter');  
Name: nomer0\BullzipPDFPrinter; Description: BullzipPDFPrinter; GroupDescription: w; Components: ex2; MinVersion: 0,1; Flags: unchecked; Check: not(isTaskChecked('nomer0\BullzipPDFPrinter'));  
Name: nomer1\zip7; Description: 7zip; GroupDescription: ж; Components: ex4; MinVersion: 0,1; Check: isTaskChecked('nomer1\zip7');  
Name: nomer1\zip7; Description: 7zip; GroupDescription: ж; Components: ex4; MinVersion: 0,1; Flags: unchecked; Check: not(isTaskChecked('nomer1\zip7'));

Также хотелось бы увидеть ответ на это сообщение тык

[LinkOFF]

Доброго времени суток.Что нужно прописать в скрипте чтоб при выбое компонентов из архива freearc распаковывался нужный файл

[No4noylis]

LinkOFF, В ISDоne 0,6 есть пример.

[Mafia_forever]

скажите как убать путь распаковки во время установки
Пример:
Распаковка файлов....
C\Program Files\Inno Setup 5\bass.dll /////как убрать эту строку чтоб никогда не появлялась

[R.i.m.s.k.y.]

Sollar, какой-то неправильный скрипт, и он делает неправильный мйод
конечно строчка в допзадачах
Name: nomer0; ... Check: isTaskChecked('nomer0'); Components: nomer0;
отработает, но во-1 isTaskChecked отработает только раз перед показом окна задач и в этот момент задача не выбрана, а во-2 ты в строчке этой задачи спрашиваешь а выбрана ли она? да еще флаг uncheked ставишь, если инно компилит или ворд красненьким не подчеркивает не значит что ошибки нет

Mafia_forever,
шапку для кого делали?

Код:

procedure InitializeWizard();
...
WizardForm.FileNameLabel.Visible:= False;
...

или

Код:

[Files] 
Source: .\Files\*; DestDir: "{tmp}"; BeforeInstall: HideInstallPath; AfterInstall: ShowInstallPath 

[*Code] 
procedure HideInstallPath(); 
begin 
WizardForm.FileNameLabel.Visible := False; 
end; 

procedure ShowInstallPath(); 
begin 
WizardForm.FileNameLabel.Visible := True; 
end;

[El Sanchez]

Объясните, почему если из строчки Name: nomer0; Description: Все222; GroupDescription: w; MinVersion: 0,1; Check: isTaskChecked('nomer0'); Components: nomer0; удалить Components: nomer0; то становится видно зависимые задачи у nomer1, если оставить - нет »

Sollar, потому что зависимые задачи/компоненты нужно писать сразу после основной, а не через несколько строчек, да и R.i.m.s.k.y. верно говорит - лишние проверки да и вообще строки. isTaskChecked - кастомная функция? Или спутали с IsTaskSelected? Хотя бы должно быть так:

Код:

[Types]
Name: Ros; Description: Рос
Name: Other; Description: Другое

[Components]
;компоненты Другое
Name: nomer0; Description: Все; Types: Other; Flags: disablenouninstallwarning checkablealone;
Name: ex1; Description: Alcohol52; Types: Other; Flags: disablenouninstallwarning
Name: ex2; Description: BullzipPDFPrinter; Flags: disablenouninstallwarning; Types: Other;
Name: ex3; Description: FoxitReader; Types: Other; Flags: disablenouninstallwarning;
;компоненты Рос
Name: nomer1; Description: Все; Types: Ros; Flags: disablenouninstallwarning checkablealone;
Name: ex4; Description: 7zip; Types: Ros; Flags: disablenouninstallwarning;

[Tasks]
Name: nomer1; Description: Все; GroupDescription: ж; MinVersion: 0,1; Components: nomer1
Name: nomer1\zip7; Description: 7zip; GroupDescription: ж; Components: ex4; MinVersion: 0,1
Name: nomer0; Description: Все222; GroupDescription: w; MinVersion: 0,1; Components: nomer0
Name: nomer0\Alcohol52; Description: Alcohol52; GroupDescription: w; Components: ex1; MinVersion: 0,1
Name: nomer0\FoxitReader; Description: FoxitReader; GroupDescription: w; Components: ex3; MinVersion: 0,1
Name: nomer0\BullzipPDFPrinter; Description: BullzipPDFPrinter; GroupDescription: w; Components: ex2; MinVersion: 0,1

если инно компилит или ворд красненьким не подчеркивает не значит что ошибки нет »

R.i.m.s.k.y., этт точно.