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

Помогите плиз, я так и не попытался вникнуть в inno, могу редактировать ток немного... (даже смотря уроки не пойму что да как)
Короче мне нужна ваша помощь, нуно чтоб первая картинка была на весь экран, а остальное как есть.
Скрипт: http://rghost.ru/25458761
Нужно чтоб картинка была только в этой области и без текста: http://s010.radikal.ru/i314/1110/77/2d4ee8ad7903.png
Заранее: Большое Спасибо! Вы мне сократите очень много время на поиски рендеров игры
Только плиз не нужно писать типо: дуб, или - учи, и т.д.
Да! Я дуб, пытался, но не пойму как изменять скрипт так что прошу помощи у вас.

insombia
куда написать то, кинь как правильно должно быть!плиз

Tappo4eK:


Код:
[Code]
procedure InitializeWizard();
begin
WizardForm.WizardBitmapImage.Width:=500;
WelcomeLabel1.Hide;
WelcomeLabel2.Hide;
end;

Ошибку выбивает:
Compile Error!
Line: 1121
Error: Column 2:
Unknown identifier 'WelcomeLabel1'

А если удаляю:
WelcomeLabel1.Hide;
WelcomeLabel2.Hide;

То вот тако получается:
http://s017.radikal.ru/i441/1110/df/11721571a08d.png
http://s017.radikal.ru/i417/1110/90/4f8c87902089.png

Как через ф-цию MoveFile или MoveFileEx переместить (заменой) все файлы из одной папки в другую, не прописывая их имена вручную и не используя CurrentFileName. MoveDir не предлагать, тк выяснилось что она глючная - иногда тупит когда в папке много больших файлов (около гига каждый) и не все перемещает (если вызывать из CurStepChanged if CurStep = ssPostInstall)!

С ошибкой в компиляции разобрался, там нуно было:
WizardForm.WelcomeLabel1.Hide;
WizardForm.WelcomeLabel2.Hide;
Но вот инсталятор как на скринах выходит что я показывал выше..

Добавлено:
фух, получилось, пришлось удалить пол кода

Цитата:

with TLabel.Create(WizardForm) do begin
AutoSize:=WizardForm.WelcomeLabel1.AutoSize;
Left:=WizardForm.WelcomeLabel1.Left;
Top:=WizardForm.WelcomeLabel1.Top
Width:=WizardForm.WelcomeLabel1.Width
Height:=WizardForm.WelcomeLabel1.Height
WordWrap:=WizardForm.WelcomeLabel1.WordWrap;
Font.Name:=WizardForm.WelcomeLabel1.Font.Name;
Font.Size:=WizardForm.WelcomeLabel1.Font.Size;
Font.Color:=clWhite;
Font.Style:=WizardForm.WelcomeLabel1.Font.Style;
Caption:=WizardForm.WelcomeLabel1.Caption;
Parent:=WizardForm.WelcomeLabel1.Parent
Transparent:=True
end;

with TLabel.Create(WizardForm) do begin
AutoSize:=WizardForm.WelcomeLabel2.AutoSize;
Left:=WizardForm.WelcomeLabel2.Left;
Top:=WizardForm.WelcomeLabel2.Top
Width:=WizardForm.WelcomeLabel2.Width
Height:=WizardForm.WelcomeLabel2.Height
WordWrap:=WizardForm.WelcomeLabel2.WordWrap;
Font.Name:=WizardForm.WelcomeLabel2.Font.Name;
Font.Size:=WizardForm.WelcomeLabel2.Font.Size;
Font.Color:=clWhite;
Font.Style:=WizardForm.WelcomeLabel2.Font.Style;
Caption:=WizardForm.WelcomeLabel2.Caption;
Parent:=WizardForm.WelcomeLabel2.Parent
Transparent:=True
end;

И подправить это:
WizardForm.WizardBitmapImage.Width := ScaleX
чтоб растянута была)

log1stable, Спасибо

Xom9I4oK
использование маски не подходит?
*.*

Не успел скачать новый инсталлятор от мехов перезалейте киньте еще раз? пожалуйста
А то нажимаю на сылку там выходит
500
на сервере произошла ошибка

Tappo4eK, да я просто забыл wizardform)

мне нужно в коде в зависимости от того выбран ли Task, совершить определенные действия, возможно ли это или нет ?

jonikDk, что именно тебе надо?

у меня есть Task
Установить значения по умолчанию.
Если пользователь поставил галку пользователь то мне надо выполнить действия(создать в корне диска пустые папки, прописать в Базе данных значения и в реестре), если галки нет, то соответственно ничего не выполняем.


Добавлено:
в принципе мне нужно только в коде добраться до чекбокса, который находиться на странице Tasks, либо если есть другой способ, определения выбран ли таск или не выбран

jonikDk
Пример из секции Tasks:
[more]
[Tasks]
Name: DesktopCheck; Description: Создать ярлык на рабочем столе
Name: GroupCheck; Description: Создать ярлык в меню пуск
Name: DirectX; Description: Установить DirectX (Интернет подключение)
Name: VCRedist; Description: Установить Microsoft Visual C++ Redistributable

[Icons]
Name: {userdesktop}\{#GameName}; Filename: {app}\{#ExeName}; Tasks: DesktopCheck
Name: {group}\{#GameName}; Filename: {app}\{#ExeName}; WorkingDir: {app}; Comment: {#GameName}; Tasks: GroupCheck
Name: {group}\Удалить игру; Filename: {app}\Uninstall\unins000; WorkingDir: {app}\Uninstall\; Comment: Удалить игру; Tasks: GroupCheck

[Run]
Filename: {src}\Redist\dxwebsetup.exe; Parameters: /q; StatusMsg: Обновление DirectX...; Flags: skipifdoesntexist; Tasks: DirectX;
Filename: {src}\Redist\vcredist_x86.exe; Parameters: /q; StatusMsg: Обновление Microsoft Visual C++ Redistributable...; Flags: skipifdoesntexist; Tasks: VCRedist; [/more]

Пример из Code:
[more]
[Icons]
Name: "{group}\{#MyAppName}"; Filename: "{app}\{#MyAppExeName}"; Check: IconCheck;

[_Code]
var
Icon: TNewCheckBox;

function IconCheck: Boolean;
begin
Result:=Icon.Checked;
end;

procedure IconOnClick(Sender: TObject);
begin
Icon.Checked:= not Icon.Checked;
end;

procedure InitializeWizard;
begin
Icon := TNewCheckBox.Create(WizardForm);
with Icon do
begin
Name := 'Icon';
Parent := WizardForm.SelectDirPage;
Left := ScaleX(11);
Top := ScaleY(190);
Width := ScaleX(200);
Height := ScaleY(17);
Caption := 'Выпить одну бутылку пива';
Checked:= True;
end;
end;
[/more]

Это надо?

Snoopak96
Это если создавать самому CheckBox, а если использовать стандартный Task ?

jonikDk,
С созданием папок хз как сделать, а с реестром можно, просто параметр Tasks указывайте у соответствующей ветки.

Из code с TNewCheckBox можно создать папку.

jonikDk
[more]
Код: [Tasks]
Name: "t1"; Description: "tasks";
Name: "t1\task"; Description: "task 1";

[dirs]
Name: "{sd}\MyDir"; Tasks: "t1\task";

[Registry]
Root: HKCU; Subkey: "Software\My Company"; Flags: uninsdeletekeyifempty; Tasks: "t1\task";

//[_code]
//так можно через код добраться...
//procedure InitializeWizard();
//begin
// if IsTaskSelected('t1\task') then
// ///
//end;

Помогите исправить плиз
http://linkme.ufanet.ru/images/83b3d0085125ba632ef7d28ae87b9e0a.png

Инсталятор аля EagleSH версия вторая. Ссылка (пароль тотже "ru-board-inno")
Решил добавить кнопку музыки а также добавить кнопку отмены по просьбам пользователей +поставил шрифт такойже как и в оригинальном инсталяторе.
Проблемы:
1) отображение шрифтов... Большой шрифт отображается красиво а вот начиная с 12 и меньше - нет(.
2) так сказать двойной показ сплеша - кто запускал его, тот поймёт.
Кто знает как решить эти проблемы просьба написать в ЛС!
P.S. meekrab я думаю ты необидешся что я взял для примера видяшку и музыку с твоего инсталятора .

troyan90
супер спасибо
А еще может подскажешь как создать папки в корне диска на который устанавливается программа ?
то есть программа устанавливается c:\Program Files\MyProgram и мне надо создать на диске C:\MyFolder1
сейчас я это в коде делаю, но хотелось бы стандартным механизмом Inno

Kutsenko
Нет мне не жалко.

ещё вопрос, вот на странице сис требований:
http://s59.radikal.ru/i163/1110/a9/78f7ebc36e43.png
В полях где написаны параметры компа, мышка как в текстовике (можно выделять буквы\цифры, и когда нажимаешь в поле, то появляется фишка как типо писать)
Как сделать чтоб не нажималось на поля, а было простое поле, и простая мышка, без нажатий итд на эти поля)?
скрипт вот:
http://rghost.ru/25522441 (если меняется не там, то я выкладывал скрипт установщика на 119 стр., просто укажите что и где поменять)

jonikDk
вот пример
[more]
Код: [dirs]
Name: "{code:getdir}\MyDir"; Tasks: "t1\task";

[_code]
function getdir(s: string): string;
begin
result:=ExtractFileDrive(ExpandConstant('{app}'));
end;

Всем доброго времени суток!
Подскажите пожалуйста как называется эта сталь и где её можно скачать??? http://img822.imageshack.us/img822/7262/90089194.jpg

troyan90

Цитата:

function getdir(s: string): string;
begin
result:=ExtractFileDrive(ExpandConstant('{app}'));
end;

Спасибо большое - работает Я хотел использовать code, но увидел что в InnoIDE нет "code" когда создаешь директорию и даже не стал пробовать. Теперь буду знать что в Name можно писать

Вопрос зачем параметр для функции GetDir ? Без параметра функция не работает, а вот с параметром работает, хотя он и не используется

Доброго времени суток.
Подскажите пожалуйста чем можно распаковать архивы .pages ?

P.S. Игра с такими архивами - Rage

jonikDk
сам до конца не понял почему без параметров не работает. сделал так, проверил, работает

ребята помогите пожалуйста как исправить
http://linkme.ufanet.ru/images/fec8d877d1c1cacba662c44a7ef0e2a7.png

EDIK3472 исправь те иероглифы в названии папки

Всем доброго времени суток!
Подскажите пожалуйста как называется эта сталь и где её можно скачать??? http://img822.imageshack.us/img822/7262/90089194.jpg

Помогите, пожалуйста, кто добр!
Проблема: при удалении вот такая штука:

а затем: