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

[SCOOTERTECHNO]

Большое вам спасибо за помощь!!!! Сейчас поробую, все сделать.

[SCOOTERTECHNO]

Опять ошибка, но уже в конце компиляции игры, до конца остаеться 7 минут выходит окно с ошибкой. Что это могло бы значить?

Окно ошибки:

http://s007.radikal.ru/i302/1101/28/284352a10690.png (http://www.radikal.ru)

Компиляция прерываеться:

http://s44.radikal.ru/i106/1101/bc/c6300cab9fcf.png (http://www.radikal.ru)

Мне кажеться это ограниечение на размер создаваемой игры или я ошибаюсь. Можно ли это исправить?

[SteamShip]

[Setup]
DiskSpanning=yes
;Размер тома в байтах (здесь 695 мегабайт)
DiskSliceSize=730000000

[SCOOTERTECHNO]

Так правильно? Он не будет делить игру на 2 части? Если добавить SlicesPerDisk=2 то он разделит игру?
Какой размер нужно прописать? Игра весит 4.37 ГБ.

[Setup]
DiskSpanning=yes
DiskSliceSize=2100000000
AppName=S.T.A.L.K.E.R. - Зов Припяти
AppVerName=S.T.A.L.K.E.R. - Зов Припяти [v1.6.00]
DefaultDirName={pf}\GSC World Publishing\S.T.A.L.K.E.R. - Зов Припяти
DefaultGroupName=GSC World Publishing\S.T.A.L.K.E.R. - Зов Припяти
OutputBaseFilename=setup
Compression=lzma
WizardImageFile=embedded\WizardImage.bmp
WizardSmallImageFile=embedded\WizardSmallImage.bmp

[SteamShip]

Помогите пожалуйста решить ошибку:

[Setup]
AppName=My Program
AppVerName=My Program v 1.5
DefaultDirName={pf}\My Program
AllowNoIcons=yes

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

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

[Code]
var
pnl: TPanel;


procedure SelectGroupFolderPage;
begin
with WizardForm do
begin
with GroupEdit do
begin
Left:= 40;
Top:= 167;
Parent:= pnl;
end;
with GroupBrowseButton do
begin
Left:= WizardForm.GroupEdit.Left + WizardForm.GroupEdit.Width + 10;
Top:= WizardForm.GroupEdit.Top - 1;
Parent:= pnl;
end;
with SelectGroupBitmapImage do
begin
Left:= WizardForm.GroupEdit.Left;
Top:= WizardForm.GroupEdit.Top - 62;
Stretch:= True;
Parent:= pnl;
end;
with TLabel.Create(pnl) do
begin
AutoSize:= WizardForm.SelectStartMenuFolderLabel.AutoSize;
SetBounds(WizardForm.GroupEdit.Left,WizardForm.GroupEdit.Top - 60,
WizardForm.SelectStartMenuFolderLabel.Width, WizardForm.SelectStartMenuFolderLabel.Height);
WordWrap:= WizardForm.SelectStartMenuFolderLabel.WordWrap;
Caption:= WizardForm.SelectStartMenuFolderLabel.Caption;
with Font do
begin
Color:= WizardForm.SelectStartMenuFolderLabel.Font.Color;
Style:= WizardForm.SelectStartMenuFolderLabel.Font.Style;
Name:= WizardForm.SelectStartMenuFolderLabel.Font.Name;
Size:= WizardForm.SelectStartMenuFolderLabel.Font.Size;
end;
Transparent:= True;
Parent:= pnl;
end;
with TLabel.Create(pnl) do
begin
AutoSize:= WizardForm.SelectStartMenuFolderlabel.AutoSize;
SetBounds(WizardForm.GroupEdit.Left,WizardForm.GroupEdit.Top - 60,
WizardForm.SelectStartMenuFolderLabel.Width, WizardForm.SelectStartMenuFolderLabel.Height);
WordWrap:= WizardForm.SelectStartMenuFolderLabel.WordWrap;
Caption:= WizardForm.SelectStartMenuFolderLabel.Caption;
with Font do
begin
Color:= WizardForm.SelectStartMenuFolderLabel.Font.Color;
Style:= WizardForm.SelectStartMenuFolderLabel.Font.Style;
Name:= WizardForm.SelectStartMenuFolderLabel.Font.Name;
Size:= WizardForm.SelectStartMenuFolderLabel.Font.Size;
end;
Transparent:= True;
Parent:= pnl;
end;

end;
with TLabel.Create(pnl) do
begin
AutoSize:= WizardForm.NoIconsCheck.AutoSize;
SetBounds(WizardForm.GroupEdit.Left,WizardForm.GroupEdit.Top - 60,
WizardForm.NoIconsCheck.Width, WizardForm.NoIconsCheck.Height);
WordWrap:= WizardForm.NoIconsCheck.WordWrap;
Caption:= WizardForm.NoIconsCheck.Caption;
with Font do
begin
Color:= WizardForm.NoIconsCheck.Font.Color;
Style:= WizardForm.NoIconsCheck.Font.Style;
Name:= WizardForm.NoIconsCheck.Font.Name;
Size:= WizardForm.NoIconsCheck.Font.Size;
end;
Transparent:= True;
Parent:= pnl;
end;
pnl.Repaint;
end;

procedure CurPageChanged(CurPageID: Integer);
begin
pnl:= TPanel.Create(WizardForm);
with pnl do
begin
Align:= alClient;
Parent:= WizardForm;
end;
with WizardForm do
begin
with WizardBitmapImage do
begin
Align:= alClient;
Stretch:= True;
Parent:= pnl;
end;
NextButton.Parent:= pnl;
CancelButton.Parent:= pnl;
pnl.Repaint;
end;

if CurPageID = wpSelectProgramGroup then SelectGroupFolderPage
end;

[SteamShip]

SCOOTERTECHNO, Чтобы разделить игру (4.37 гб) на 2 равные части нужно либо прописать: DiskSpanning=yes
DiskSliceSize= 2 295 035 971 либо SlicesPerDisk=2 DiskSpanning=true(ну или yes без разницы)

SlicesPerDisk=2 писать не нужно эта функция не делит установку на части она лишь отвечает за название томов а чтобы разделить установку на 2 равные части пиши: DiskSpanning=yes
DiskSliceSize= 2 295 035 971

[SCOOTERTECHNO]

SteamShip, Спасибо за помощь, я создал игру, установил, игра работает но я зык меню на английском и имеет такой вид надписей menu_options Кривой инсталятор получился, :) вроде скрипт правильный, чего ему не хватает :dont-know

[SteamShip]

SCOOTERTECHNO, язык меню в игре?

[actavir]

Лександер, вы мне давали пример привязки архивов к компонентам, я не смог там разобраться.
Если вам не сложно не могли бы вы дать пример тупо с freearc и компонентами.
И сразу же я до конца не могу разобраться как если выбираешь что устанавливать то ярлыки только для того устанавливались?
Помогите кто-нибудь!!!!!
Заранее огромное спасибо!!!

[SCOOTERTECHNO]

SteamShip, язык меню на английском, хотя он должен быть на русском, слова в меню идут через черточку например: menu_options. Скринтош уже не смогу сделать я удалил свой Repack "STALKER - Зов Припяти" . Я делал Repack не из установленной игры а из распакованного инсталлятора из лицензионного дистрибутива, непонятно даже почему при компиляции игры вылетали ошибки в скрипте, iss скрипт тоже оригинальный,он распоковался вместе с дистрибутивом. Я заменил лиш файл xrEngine.exe в папке bin на патченый файл xrEngine.exe (чтобы запускать игру без диска) Замена этого файла ни в коем случае не влияет на скрипт. Интересно каким софтом разработчики поковали игру? В Inno Setup собрать репак из оригинального скрипта не получается, хотя с помощью этого скрипта они как то запаковали игру.

[actavir]

SCOOTERTECHNO, вы не могли бы мне помочь? Вопрос одним сообщением выше.

[Habetdin]

Пример создания диалогового окна и создания *.ini файла »
Забыли:
var
Page: TInputQueryWizardPage;

[SCOOTERTECHNO]

actavir, Про какие архивы идет речь?

[actavir]

SCOOTERTECHNO, про freearc. Я хотел сделать установку из нескольких архивов с возможностью выбора того, что хочешь устанавливать.

[SCOOTERTECHNO]

actavir, Я не работал с этим архиватором. Зайдите сюда http://forum.ru-board.com/topic.cgi?forum=5&topic=24319 возможно найдете ответ. Там подробное описание используйте поиск по форуму.

[actavir]

Блин я там искал ничё путного не нашёл. Буду ждать помощь у кого-нибудь ещё! Может есть у кого-нибудь пример???

[actavir]

SCOOTERTECHNO, а вы вот лично с какими архиваторами можете дать пример на этот вопрос?

[SteamShip]

SCOOTERTECHNO, у установки лицензионного сталкера есть фаил-пустышка если вы не умеете их создавать то я поясню, также важны файлы реестра и у лицензии через секцию код осуществляются многие функции скрытые для распаковщиков вообщем завтра я сам распакую игру и всё проанализирую P.S. А вообще лучше и проще использовать уже готовые скрипты

[SCOOTERTECHNO]

SteamShip, хорошо, спасибо! Кстати в предыдущих сообщениях есть описанные мной ошибки которые возникали при компиляции игры Там я вылажил и оригинальный iss скрипт, советую прочитать http://forum.oszone.net/thread-190621-46.html Пустой файл, это случайно не sj.rpk?

[SCOOTERTECHNO]

SCOOTERTECHNO, а вы вот лично с какими архиваторами можете дать пример на этот вопрос? »

actavir я занимаюсь перепаковкой лицензионных игр через скрипты Inno Setup, когда это мне необходимо. Распаковку делаю с Universal Extractor. Я не смогу вам помочь с вашим вопросом, :dont-know Здесь и тема соответственно про скрипты Inno Setup.