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

Статус
В этой теме нельзя размещать новые ответы.
ACtivity

ACtivity

Новичок
AlexandR
создай новый лейбл и кинь его поверх панели.
--------------------
Пример, Так как то :)
--------------------
---------------------------------------------------------
Тут - http://rghost.ru/23669421
---------------------------------------------------------
Эт для секции [Run]
--------------
[Run]
Filename: {src}\DirectX\DXSETUP.exe; WorkingDir: {src}\DirectX; Parameters: /silent; StatusMsg: Идет обновление DirectX...; Check: MakeDirectX; Flags: waituntilterminated
Filename: {src}\Redist\vcredist_x86.exe; WorkingDir: {src}\Redist; Parameters: /q; StatusMsg: Идет установка VisualC++ Redist... Пожалуйста, подождите.; Check: MakeVisual and not IsWin64; Flags: waituntilterminated
Filename: {src}\Redist\vcredist_x64.exe; WorkingDir: {src}\Redist; Parameters: /q; StatusMsg: Идет установка VisualC++ Redist... Пожалуйста, подождите.; Check: MakeVisual and IsWin64; Flags: waituntilterminated
 
Последнее редактирование:
LexBell

LexBell

Борода
Супер модератор
dvd4el написал(а):
Как загрузить изображение в DirEdit?
Нажмите для раскрытия...
Нууу... за полминуты в формдизайнере расширенной версии, можно получить такой код:

Код: 
[Setup]
AppName=My Application
AppVersion=1.5
DefaultDirName={pf}\My Application

[_Code]
procedure InitializeWizard();
begin
  with TBitmapImage.Create(WizardForm) do
  begin
    Parent := WizardForm.DirEdit;
    Align:=alClient;
    Stretch := True;
    Bitmap:=WizardForm.WizardSmallBitmapImage.Bitmap;
  end;
end;
 
Avangard

Avangard

Участник
Gnom, такое мне не подходит. Во-первых, не видно текста, во-вторых текст нельзя выделить.
 
Последнее редактирование модератором:
M

Megalol

Мимокрокодил
1) Как адаптировать этот скрипт для юникод версии? У меня на ней проценты в минус уходят!
2) Как сделать чтобы сплэш-заставка показывалась\грузилась параллельно с самим инсталлером (все сплеши что я видел уходят в "Sleep" на время показа). И как реализовать такой сплэш (показ видео или гиф-анимации), который бы вызывался без проблем из InitializeSetup() - у меня пишет что типа WizardForm не создан - идете на юх?
3) Как убить нужный мне процесс (он выполняется парал-но с самим Инно) через 5 сек?
4) Как исправить это http://farm7.static.flickr.com/6169/6175390949_ea49caac2c.jpg в скине черном скине Tiger на Win7. Должно быть так как напротив PotPlayer (белая стрелка слева). Цвета фона и текста менять нельзя. Только сами значки раскрытия папок?
5) Как защитить (паролем или еще как, чтобы их нельзя было спереть) временные файлы Инно (распаковываемые в папку Temp).
 
Последнее редактирование:
DaRKdemoN

DaRKdemoN

Участник
Проверенный
AlexandR написал(а):
1)Как можно передвинуть "распоковка игровых ресурсов" на странице установки
Нажмите для раскрытия...
WizardForm.StatusLabel.Left:= xx;

AlexandR написал(а):
2)Можно ли округлить процентный прогресс (чтобы был не 59,3% a 59% )
Нажмите для раскрытия...
Round(xx);

AlexandR написал(а):
3)Где в скрипте можно переменовать кнопку отмены на странице установки,так чтобы кнопка растягивалась под написаный текст
Нажмите для раскрытия...
Код: 
procedure CurPageChanged(CurPageID: Integer);
begin
  if CurPageID = wpInstalling then
    with WizardForm.CancelButton do begin
      Caption:= 'Заголовок';
      Left:= xx; //подгоняешь сам
      Width:= xx; //подгоняешь сам
    end;
end;
AlexandR написал(а):
4)Как добавить такую рамочку с Надписью в середине
Нажмите для раскрытия...
используйте TBevel
 
Avangard

Avangard

Участник
AlexandR написал(а):
Можно ли округлить процентный прогресс (чтобы был не 59,3% a 59% )
Нажмите для раскрытия...
LabelPct1.Caption :=IntToStr(OveralPct div 10)+'%';

DaRKdemoN, естественно.

DaRKdemoN, я думаю, что он имел введу ISDone. OveralPct:Longword .
 
Последнее редактирование модератором:
AlexandR

AlexandR

Новичок
как полностью скрыть лого на странице начала\завершения установки?, пробывал через CurPageChanged если пишу wpWelcome то лого проподает на всех страницах и еще вдобавок остается черный прямоугольник на страницах,а если ставлю убрать лого только на странице установки и финиша то уберается нормально...
Код: 
CurPageChanged(CurPageID: Integer);
Begin
  if CurPageID=wpInstalling then begin
  LogoImage.Hide;
   end;
 if CurPageID=wpFinished then begin 
 LogoImage.Hide;
  end;        
end;
Может есть другой способ обойти это?
 
Avangard

Avangard

Участник
AlexandR, Попробуй так
CurPageChanged(CurPageID: Integer);
Begin
LogoImage.Show;
if CurPageID=wpWelcome then begin
LogoImage.Hide;
end;
if CurPageID=wpFinished then begin
LogoImage.Hide;
end;
end;
 
Spider

Spider

Новичок
Привет всем!!! Подскажите пожалуйста скрипт...
Как Заменить кнопки Далее,Назад,Отмена,Обзор, чтобы на каждой кнопки была другая картинка в формате .png?
 
Edison007

Edison007

Ветеран
Модератор
ну берете свои картинки и всё, чуть именяете скрипт и вуаля
 
baqzar

baqzar

Новичок
Здравствуйте. Вот к примеру часть моего скрипта : #ifdef Components
[Components]
Name: text; Description: {cm:Languageofsubtitles}; Types: full custom; Flags: fixed
Name: text\rus; Description: {cm:Russian}; Types: full; Flags: exclusive; ExtraDiskSpaceRequired: 100000000
Name: text\eng; Description: {cm:English}; Types: custom; Flags: exclusive; ExtraDiskSpaceRequired: 200000000
Name: voice; Description: {cm:LanguageofVoice}; Types: full compact custom; Flags: fixed
Name: voice\rus; Description: {cm:Russian}; Types: full; Flags: exclusive; ExtraDiskSpaceRequired: 500000000
Name: voice\eng; Description: {cm:English}; Types: custom; Flags: exclusive; ExtraDiskSpaceRequired: 600000000
#endif.
Если я найду файлы локализации, русской или англ. версии, то мне их куда надо кидать, чтобы в инсталляторе был выбор языка игры?
 
ACtivity

ACtivity

Новичок
baqzar написал(а):
Здравствуйте. Вот к примеру часть моего скрипта : #ifdef Components
[Components]
Name: text; Description: {cm:Languageofsubtitles}; Types: full custom; Flags: fixed
Name: text\rus; Description: {cm:Russian}; Types: full; Flags: exclusive; ExtraDiskSpaceRequired: 100000000
Name: text\eng; Description: {cm:English}; Types: custom; Flags: exclusive; ExtraDiskSpaceRequired: 200000000
Name: voice; Description: {cm:LanguageofVoice}; Types: full compact custom; Flags: fixed
Name: voice\rus; Description: {cm:Russian}; Types: full; Flags: exclusive; ExtraDiskSpaceRequired: 500000000
Name: voice\eng; Description: {cm:English}; Types: custom; Flags: exclusive; ExtraDiskSpaceRequired: 600000000
#endif.
Если я найду файлы локализации, русской или англ. версии, то мне их куда надо кидать, чтобы в инсталляторе был выбор языка игры?
Нажмите для раскрытия...
---------------------------------------------------
Справку слабо прочитать по ISDon'у ?
---------------------------------------------------
ExpandConstant('{src}'),'CODMW2_Disk2.arc' ) then break;
if not ISArcExtract ( 1, 0, ExpandConstant('{src}\rustext.arc'), ExpandConstant('{app}'), false, '', '', '', notPCFonFLY ) then break; // язык интерфейса RUS
if not ISArcExtract ( 2, 0, ExpandConstant('{src}\engtext.arc'), ExpandConstant('{app}'), false, '', '', '', notPCFonFLY ) then break; // язык интерфейса ENG
if not ISArcExtract ( 3, 0, ExpandConstant('{src}\rusvoice.arc'), ExpandConstant('{app}'), false, '', '', '', notPCFonFLY ) then break; // язык озвучки RUS
if not ISArcExtract ( 4, 0, ExpandConstant('{src}\engvoice.arc'), ExpandConstant('{app}'), false, '', '', '', notPCFonFLY ) then break; // язык озвучки ENG
----------------------------------------------------
Красным выделен номер компонента, т.е
-----------------------------------------
1= Name: text\rus; Description: {cm:Russian}; Types: full; Flags: exclusive; ExtraDiskSpaceRequired: 100000000
2= Name: text\eng; Description: {cm:English}; Types: custom; Flags: exclusive; ExtraDiskSpaceRequired: 200000000
-----------------------------------------
И так далее.
 
Последнее редактирование:
Spider

Spider

Новичок
1)как в удаление и изменении программы сделать чтобы отображался размер не инстоллятора а самой установленной игры?
2)как убрать кнопку обзор на странице выбора папки установки?
 
Последнее редактирование:
ACtivity

ACtivity

Новичок
Spider написал(а):
1)как в удаление и изменении программы сделать чтобы отображался размер не инстоллятора а самой установленной игры?
2)как убрать кнопку обзор на странице выбора папки установки?
Нажмите для раскрытия...
1) -
2) Так как то
--------------------------------------------
Код: 
Procedure CurPageChanged(CurPageID: Integer);
begin
  if CurPageID = wpSelectDir then
  begin
  If WizardForm.FindComponent('DirBrowseButton') is TButton
  then
  TButton(WizardForm.FindComponent('DirBrowseButton')).Hide;
  end;
  end;
--------------------------------------------
 
Winst@n

Winst@n

Участник
Проверенный
FATAL,
Что как то мудрено все.
Procedure CurPageChanged(CurPageID: Integer);
begin
WizardForm.DirBrowseButton.hide //wpSelectDir
WizardForm.GroupBrowseButton.hide //wpSelectProgramGroup
end;
 
DeKaN

DeKaN

Новичок
Winst@n, учитывая, что Inno интерпретатор, то не стоит так делать
лучше:
Код: 
procedure InitializeWizard();
begin
  WizardForm.DirBrowseButton.hide;
end;
 
Spider

Spider

Новичок
1)как в Inno setup Показать реальный размер установленной игры в удаление и изменении программы?
2)Как сделать на странице установки чтоб при передвижении "Установка игры" не менялось положение установки дополнительного ПО в конце, и не открывался лейбел Откат установки?
 
Winst@n

Winst@n

Участник
Проверенный
DeKaN,
В вашем случае данный пример работает только на стандартной форме. (по крайней мене у меня только на стандартной форме, в моем скрипте это никак не действует)
В примере что я написал мы можем вызвать уже отключенную кнопку на нужной нам стр.
 
Последнее редактирование:
Статус
В этой теме нельзя размещать новые ответы.
Сверху