» Inno Setup (создание инсталяционных пакетов)

Dark_Delphin, можно так:
.......
[Languages]
Name: "eng"; MessagesFile: "compiler:Default.isl"
Name: "rus"; MessagesFile: "compiler:Languages\Russian.isl"

[CustomMessages]
rus.Need=Игра займёт на диске:_
eng.Need=Game will take on disk:_
.......
NeedSpaceLabel.Caption := ExpandConstant('{cm:Need}') + MbOrTb(NeedSize);
.......
Остальные по аналогии.

innonewbie
Да. Спасибо большое.

Привет всем, подскажите, где можно найти справку или примеры по работе и созданию своих форм таких как WizardForm.

alex0413
А в шапке смотрели? Если не нашли могу пример написать. Но возможно он уже есть в шапке в примерах. Посмотрите.

Подскажите как называются строки см.скриншоты

[more=скриншоты]
[/more]

Dark_Delphin

В первом скрине:
Первая: WizardForm.PageNameLabel
Вторая: Создана в Task задаче, как убрать х.з.

Во втором скрине:
WizardForm.PageNameLabel

Команда скрытия: WizardForm.PageNameLabel.hide;

sjwrec
Я хочу для них сделать отдельно шрифт другой.
Спасибо.

Скрипт Отдельного Видео Авторуна - для примера взята игра "[PROTOTYPE]™"

Для работы со скриптом нужен AVI файл закодированный кодеком XVID.
Положите его в папку XVID и переименуйте в fon.avi

Скачать

sjwrec
смотрел, и не только в шапке, но ничего подобного не видел. Был бы благодарен если бы написали пример.

alex0413
Хорошо, вот примерный набросок [more=Пример]
[_Code]
var
MyForm: TSetupForm; // Переменная для создания формы

// (Здесь указывается функция Например: function InitializeSetup(): Boolean;)
begin
MyForm := CreateCustomForm;
with MyForm do begin
Width := 800; // Ширина формы
Height := 600; // Высота формы
BorderIcons := []; // Только кнопка Закрыть (Свернуть и развенуть скрыты.) Остальные значения см.справку Inno
BorderStyle:=bsSingle // Фиксированноый размер формы (Пользователь не сможет изменить размер окна формы) Остальные значения см.справку Inno
Position := poScreenCenter; // Показывать окно формы по центру экрана
Caption:='Моя собственная форма'; // Заголовок формы
end;

MyForm.ShowModal; // Эта строка не позволит продолжить работу пока не будет закрыта форма (Полезно для создания встроенного Авторана в Сетап)

MyForm.Free; // Так форма не просто закрывается, но и освобождает ресурсы которые занимала.
end;
[/more]

sjwrec
спасибо огромное, очень помогло

ISVideo.dll v.1.5.0 - Библиотека воспроизводит музыку и видео
+ Добавлена поддержка Adobe Flash Player
+ Добавлена поддержка DX Video, то есть вы сможете воспроизводить видео через функцию DXVideoInit
+ Добавлена поддержка DX Music, то есть вы сможете воспроизводить музыку через процедуру DXMusicInit
+ Добавлена процедура воспроизведений .Wav файлов ISWaveInit
+ Добавлена функция CallBack для таймера (SetTimer)
Author by AVMan

---

P.S.: Большой вес архива из за xvidcore.dll и xvidvfw.dll
Скачать с xvidcore.dll и xvidvfw.dll:
http://rghost.ru/38182479
Скачать без xvidcore.dll и xvidvfw.dll:
http://rghost.ru/38182627

Всем доброго времени суток!
Недавно наткнулся на этот скрипт CoD:BO v1.0 (автор VinTagE). Вроде бы все отлично, но есть одна проблема - текст в полоске при выборе папки установки/группы меню "Пуск" не обновляется. То есть:
Стандартный путь C:\Program Files\Activision\Call of Duty - Black Ops - в полоске отображается такой же.
Если во время установки изменить на D:\Games\CoD Black Ops - текст останется прежним C:\Program Files\Activision\Call of Duty - Black Ops (хотя на самом деле путь изменился).
Как решить эту проблему?
Заранее спасибо.

В процедуре InitializeWizard3, найди лэйбел (Label) DirEditLabel и замени его на этот лэйбел

[more=Заменить на это]DirEditLabel := TLabel.Create(WizardForm);
with DirEditLabel do begin
AutoSize:=False;
SetBounds(ScaleX(130), ScaleY(188), ScaleX(275), ScaleY(15));
WordWrap:= True;
ShowAccelChar := False;
Transparent:=True;
Font.Name:= 'Arial'
Font.Size:= 8;
Font.Color:=$FFFFFF;
Font.Style:=[fsBold];
Caption := WizardForm.DirEdit.Text;
OnMouseDown:=@LabelOnMouseDown;
Parent := WizardForm;
end;[/more]Строка: (437:1)

---

В той же процедуре найди WizardForm.DirEdit.Text := WizardForm.DirEdit.Text + #0; и убери его.
строку подскажу: (490:1)

---

В той же процедуре найди лэйбел GroupEditLabel, и замени его на этот лэйбел

[more=Заменить на это]GroupEditLabel := TLabel.Create(WizardForm);
with GroupEditLabel do begin
AutoSize:=False;
SetBounds(ScaleX(130), ScaleY(188), ScaleX(275), ScaleY(15));
WordWrap:= True;
ShowAccelChar := False;
Transparent:=True;
Font.Name:= 'Arial'
Font.Size:= 8;
Font.Color:=$FFFFFF;
Font.Style:=[fsBold];
Caption := WizardForm.GroupEdit.Text;
OnMouseDown:=@LabelOnMouseDown;
Parent := WizardForm;
end;[/more]Строка: (508:1)

есть у кого-то пример скрипта в котором компоненты сделаны через секцию code. Я раньше вроде в справке видел, но сейчас не могу найти, гугл тоже не дал результатов.

alex0413
http://rghost.ru/38238330

vintage_1, спасибо.
Не могли бы еще раз помочь? После удачного завершения установки или отмены распаковки файлов инсталлятор виснет - окно исчезает, но он остается висеть в процессах ("выключить" можно только через Диспетчер задач).

Скрипт Отдельного Видео Авторуна - для примера взята игра "[PROTOTYPE]™"

Реализован на библиотеке IsPicture_for_all.dll

Для работы со скриптом нужен AVI файл закодированный кодеком XVID.
Положите его в папку XVID и переименуйте в fon.avi

Скачать


З.Ы Подскажите хороший сайт для хранения скринов.

sjwrec

Цитата:

Подскажите хороший сайт для хранения скринов.

http://fastpic.ru/

Sotonisto
Этот скрипт очень старый, вот день когда я его собирал, был для меня практикой, версию 1.1 не делал и думаю делать не буду, вообщем той проблемы у меня не было, а так попробуй закрыть процесс через Handle, функция CloseHandle
Пример: CloseHandle(WizardForm.Handle); - засунь её в процедуру DeinitializeSetup
Функция: function CloseHandle(hObject: Cardinal): LongBool; external 'CloseHandle@Kernel32.dll stdcall';

vintage_1

Цитата:

Пример: CloseHandle(WizardForm.Handle); - засунь её в процедуру DeinitializeSetup
Функция: function CloseHandle(hObject: Cardinal): LongBool; external 'CloseHandle@Kernel32.dll stdcall';

А можно так другие окна закрывать не относящиеся к инсталл-у, но запущенные этим инсталл-ом?

sjwrec
Можно, если знаешь Handle окна

[more=Скрипты инсталляторов для игр от Krinkels Team]

[b]Krinkels Team занимается написанием скриптов как платных, так и бесплатных, так же делает работы на заказ. В ниже приведенной таблице отображены все проекты группы, ещё ниже предоставлены для скачивание бесплатные из них.