Скрипты Inno Setup. Помощь и советы [часть 3]

[Raf-9600]

это все из-за билиотеки, а не из-за скрипта. Лови пример как это сделать без библиотеки (компилируется на последней версии »
Скрипт конечно крутой, но боюсь что мне знаний не хватит, адаптировать его под собственные нужды.

[Mafia_forever]

vint56 о да ответили но я там не видел подробностей куда чё в скрипт вписывать :dont-know

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

ответить тебе и сделать за тебя - это две большие разницы

и ещё как зарегестрировать ярлык на раб столе чтоб он запускался всегда а то у меня запускается 1 раз а потом ошибка пишет Отправить отчет или Не отправлять отчет »
если ярлык запускается первый раз и потом не запускается - дело скорее всего "не в бензине"

[Mafia_forever]

дайте сыль для callbackctrl.dll

[Habetdin]

Mafia_forever, первые ссылки из Google: http://rghost.ru/9817741, http://rghost.ru/9353911 - в архивах есть CallbackCtrl.dll

[insombia]

Mafia_forever чтобы не спрашивать по 100500 раз здесь есть все библиотеки со скриптами http://forum.ru-board.com/topic.cgi?forum=5&topic=36421&start=0&limit=1&m=4#1

вот не могу понять что такое в isSlideShow v1.02 Hwnd - Хэндл окна обясните

[LinkOFF]

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

[VASYAKRN]

Текстурируйте кнопки http://inno.at.ua/TMP/Assassins_Creed_Revelations.7z

[insombia]

VASYAKRN капец ты что сам не можешь или что??? это не сложно есть куча примеров как это делать

[Mafia_forever]

вот скрипт http://spaces.ru/files/?sid=&link_id=12513165404&p=1&plain=0&read=21586941&name=Ceasar_big_boss&dir=1729630 куда чё надо вписать чтоб на инсталяторе была musicbutton.png у меня есть все библиотеки для этого но я не знаю что надо вписывать в сам код в сам скрипт

[valyok666]

Mafia_forever, ты бы скидывал архив с файлами

[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

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

[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'));


Также хотелось бы увидеть ответ на это сообщение тык (http://forum.oszone.net/post-1739690-2865.html)

[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, какой-то неправильный скрипт, и он делает неправильный мйод :o
конечно строчка в допзадачах
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;