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

[murlakatamenka]

Лександер, да, спасибо. это то, что нужно
такой вопрос, а свои типы создать можно вместо встроенных custom full и compact ?
(спрашиваю, а зачем не знаю :))

[Gnom_aka_Lexander]

murlakatamenka, Можно. Поиграйся с прогами IsTool и InnoIDE - там создание всех секций, кроме кода, удобно автоматизировано.
Проги обе глюковаты, но одна в одном, другая - в другом, и с успехом друг-друга компенсируют :)

[murlakatamenka]

Лександер, в основном использую связку InnoIDE + Inno Setup с расширенным компилятором. полный комплект различных утилит в InnoUltra есть.

[yourikom]

Всем доброе время суток.

я только начал юзать инно и у меня сразу вопрос:

как поменять цвет в самом инсталяторе (в меню именно а не шрифт)

покажите пример полный пожалуста

и как вставить свою музыку????

я пытался, но сетап или не запускался патом или запускался, но вместо музыки звук
предупреждения windows без перерыва
-------------
Пожалуста помогите

[yourikom]

[Setup]
AppName=My Program
AppVersion=1.5
DefaultDirName={pf}\My Program
; Since no icons will be created in "{group}", we don't need the wizard
; to ask for a Start Menu folder name:
DisableProgramGroupPage=yes
UninstallDisplayIcon={app}\MyProg.exe
OutputDir=userdocs:Inno Setup Examples Output

[Files]
Source: "MyProg.exe"; DestDir: "{app}"
Source: "MyProg.chm"; DestDir: "{app}"
Source: "Readme.txt"; DestDir: "{app}"; Flags: isreadme
Source: "Sound.wav"; DestDir: "{tmp}"; Flags: dontcopy

[Code]
function sndPlaySound(lpszSoundName: string; uFlags: cardinal):integer;
external 'sndPlaySoundA@winmm.dll stdcall';

procedure InitializeWizard();
begin
ExtractTemporaryFile(ExpandConstant('sound.wav'));
sndPlaySound(ExpandConstant('{tmp}\sound.wav'), $0001 or $0008);
end;


[Icons]
Name: "{commonprograms}\My Program"; Filename: "{app}\MyProg.exe"
Name: "{commondesktop}\My Program"; Filename: "{app}\MyProg.exe"

ВОТ И Я НЕ ПОЙМУ ПОЧЕМУ НЕ ИГРАЕТ МУЗЫКА

[LinkOFF]

Как мне поменять цвет шрифта на каждой странице инсталлятора

[Gnom_aka_Lexander]

LinkOFF, так:
procedure InitializeWizard();
begin
WizardForm.Font.Color := clLime;
end;

[DevilisH]

Помогите, пожалуйста с такой проблемой: у меня черный инсталлятор и текст белого цвета, но фон страницы с дополнительными задачами серый (текста не видно). Как сделать его черным, чтобы текст был виден?
http://i042.radikal.ru/1105/c2/cacbc1c62bb6.jpg

[Gnom_aka_Lexander]

DevilisH, в procedure InitializeWizard(); добавь строчку: WizardForm.TasksList.Color := clBlack;

[LinkOFF]

Как изменить цвет шрифта на первой странице инсталятора и если можно на каждой отдельно

[Alexey_KF]

Помогите!
Есть две программы program1.exe и program2.exe
Хочу собрать инстолятор с таким условием;
1. Чтоб во время установки пользователь выбирал какую программу установить
2. После выбора начиналась установка program.exe

Все обрыл, перелистал нимогу ничего сделать.
Помогите пожалуйста!!!!!!!!!!!!!!!!

[vint56]

Alexey_KF,
[Setup]
AppName=My Program
AppVersion=1.5
;AppVerName=My Program 1.5
AppPublisher=My Company, Inc.
DefaultDirName={pf}\My Program
DefaultGroupName=My Program

[Languages]
Name: russian; MessagesFile: compiler:Languages\Russian.isl

[Files]
Source: C:\Users\Vitaly\Desktop\Программа1.exe; DestDir: {app}; Components: prog1
Source: C:\Users\Vitaly\Desktop\Программа2.exe; DestDir: {app}; Components: prog2

[Types]
Name: full; Description: Full installation; Flags: iscustom
[Components]
Name: prog1; Description: Программа1; Flags: exclusive
Name: prog2; Description: Программа2; Flags: exclusive

[Alexey_KF]

vint56,
спасибо, но мне не нужно чтоб была распаковка в програм файлс... Мне нужно чтоб была распаковка например во временную папку и чтоб после того как программа 1 установилась инстолятор удалися из временной папки...
Во как

Пожалуйста помогите!

и кстати... vint56, по скрипту который выше ты мне дал после распаковки не запускается программа, а мне надо чтоб запускалась...

[Habetdin]

Alexey_KF, [Setup]
AppName=My Program
AppVerName=My Program v 1.5
DefaultDirName={pf}\My Program
OutputDir=.
Compression=lzma/ultra
InternalCompressLevel=ultra
SolidCompression=yes

[Languages]
Name: rus; MessagesFile: compiler:Languages\Russian.isl

[Files]
Source: Setup/program1.exe; DestDir: {tmp}; DestName: program.exe; Flags: ignoreversion deleteafterinstall; Components: com1
Source: Setup/program2.exe; DestDir: {tmp}; DestName: program.exe; Flags: ignoreversion deleteafterinstall; Components: com2

[Types]
Name: custom; Description: Custom; Flags: iscustom;

[Components]
Name: com1; Description: "Install Program #1"; Flags: exclusive
Name: com2; Description: "Install Program #2"; Flags: exclusive

[Run]
Filename: {tmp}\program.exe; WorkingDir: {tmp}; Flags: runhidden waituntilterminated

[insombia]

Как сделать инсталятор как у каталистов(новой версии)?

[Alexey_KF]

Habetdin, Спасибо!!! только вместо строчек
DefaultDirName={pf}\My Program
OutputDir=.

я сделал так:
CreateAppDir=no


Еще вопрос: У меня над прогресс баром виден путь распаковки.. Его скрыть можно?

[nik1967]

Еще вопрос: У меня над прогресс баром виден путь распаковки.. Его скрыть можно? »
Можно:
WizardForm.FilenameLabel.Hide;

Как сделать инсталятор как у каталистов(новой версии)? »
Руками :smirk: Я ведь как то сделал.

[Alexey_KF]

nik1967, куда именно строчку вставлять?

[Gnom_aka_Lexander]

Alexey_KF,
procedure InitializeWizard();
begin
WizardForm.FilenameLabel.Hide;
end;

[insombia]

nik1967, :o а можеш дать плиз свой скриптик?