[Swotch]

Swotch, Вот это окно не убирается: »

Повторюсь, в инсталляторах выше версии Inno Setup 5.3.7 работать не будет. С чем связан сей недостаток не знаю. !

[ivsatel]

Тогда перефразирую вопрос, можно ли указать что инсталляция изначальна будут в режиме /VERYSILENT /SUPPRESSMSGBOXES /NORESTART /SP-

[dimon135]

помогите пожалуйста.Я сделал инсталятор, решил проверить,но при начале распаковки .arc файлов пишет"FreeArc вернул код ошибки: -1
Возможно, архив Data4.arc повреждён или недостаточно места на диске назначения."
Вот часть скрипта:



[Files]
;Source: *.arc; DestDir: {app}; Flags: nocompression
Source: C:\Program Files\Electronic Arts\Need For Speed:Shift\unarc.dll; DestDir: {tmp}; Flags: dontcopy deleteafterinstall
Source: C:\Program Files\Electronic Arts\Need For Speed:Shift\InnoCallback.dll; DestDir: {tmp}; Flags: dontcopy
Source: C:\Program Files\Electronic Arts\Need For Speed:Shift \Data4.arc; DestDir: {app}; Flags: nocompression


[UninstallDelete]
Type: filesandordirs; Name: {app}

[code]
const
Archives = 'C:\Program Files\Electronic Arts\Need For Speed:Shift\Data4.arc';
PM_REMOVE = 1;
CP_ACP = 0; CP_UTF8 = 65001;
oneMb = 1048576;

И еше вопрос:как добавить несколько архивов в этой строчке:Archives = 'C:\Program Files\Electronic Arts\Need For Speed:Shift\Data4.arc'; ?

[Swotch]

Тогда перефразирую вопрос, можно ли указать что инсталляция изначальна будут в режиме /VERYSILENT /SUPPRESSMSGBOXES /NORESTART /SP- »

Я так понимаю вам нужен тихий инсталлятор, при устаноке без отображения диалоговых окон!

читать дальше »

Код:

[Setup]
AppName=My Program
AppVerName=My Program 1.5
DefaultDirName={pf}\My Program
DisableDirPage=yes
DisableProgramGroupPage=yes
DisableReadyPage=yes
DisableFinishedPage=yes
OutputBaseFilename=setup
Compression=lzma
SolidCompression=yes

[Files]
Source: C:\Program Files\Inno Setup 5\Examples\MyProg.exe; DestDir: {app}; Flags: ignoreversion

[_Code]
procedure CurPageChanged(CurPageID: Integer);
begin
If CurPageID=wpWelcome then
begin
SendMessage(WizardForm.NEXTBUTTON.Handle, 513, 0, 0)
SendMessage(WizardForm.NEXTBUTTON.Handle, 514, 0, 0)
end
end;

Предварительно удалить все новые версии Inno Setup, поставить версию Inno Setup 5.3.7. Взять предложенный мной пример, скопировать код в окно инсталлятора( убрать штрих _ в начеле секции [code]), скомпилировать и проверить установку! Инсталлятор должен получиться тихий, без диалоговых окон!

Возможно я вас не правильно понимаю...

[THE GUILTY GOD]

Народ подскажите как с помощью precomp сжать всю папку, а то у меня только получается сжать каждый файл по отдельности

[ArtemYa]

Здравствуйте, читал, читал форум и не нашел своих ответов, данным делом никогда не занимался, поэтому, если можно, расскажите поподробней.
1. Как сделать, чтобы setup не выгружал из себя файл, а копировал при запуске, например файлы-видео;
2. Как указать директорию выгрузки файла, которая на разных машинах может быть разной, но имеет имя со схожем началом;
3. Как при выгрузке файлов .dll сделать их регистрацию.
Заранее большое спасибо!!!

[nik1967]

ArtemYa,
Когда запущен Inno Setup Compiler, нажми клавишу F1. Много чего интересного узнаешь.

читать дальше »

1. [Files] section
Flags
external
This flag instructs Inno Setup not to statically compile the file specified by the Source parameter into the installation files, but instead copy from an existing file on the distribution media or the user's system. See the Source parameter description for more information.

2. Там же: Constants

3. Там же: Pascal Scripting: RegisterServer
Prototype:
procedure RegisterServer(const Is64Bit: Boolean; const Filename: String; const FailCriticalErrors: Boolean);

Description:
Registers the DLL/OCX with the specified filename. If Is64Bit is True, the DLL/OCX will be loaded as a 64-bit image and registered in a 64-bit process. If FailCriticalErrors is True, the system will not display any critical-error-handler message boxes. Raises an exception if not successful.

Example:
begin
// Register hhctrl.ocx located in the System directory.
RegisterServer(Is64BitInstallMode, ExpandConstant('{sys}\hhctrl.ocx'), False);
end;Because we specify Is64BitInstallMode in the first parameter, it will register the 64-bit OCX in the 64-bit System directory when Setup is running in 64-bit mode. Otherwise, it will register the 32-bit OCX in the 32-bit System directory.

THE GUILTY GOD,
А ты темой не ошибся?
Внимание! Данная тема предназначена только для обсуждения написания скриптов !

[R.i.m.s.k.y.]

Когда запущен Inno Setup Compiler, нажми клавишу F1. »

+стопиццот!
А еще в шапке лежит русский F1!

[Imitri7]

кто нибудь знает как сделать окно распаковки как у механиков?

[nik1967]

Imitri7,

Прогрессбар в правом нижнем углу как у механиков

Код:

[_Code]
function GetSystemMetrics(nIndex:Integer):integer; external 'GetSystemMetrics@user32.dll stdcall delayload';

procedure InitializeWizard();
begin
 //Выносим кнопку "Отмена" на передний план
  WizardForm.CancelButton.BringToFront;
end;

 procedure CurPageChanged(CurPageID: Integer);
 begin
  if CurPageID=wpInstalling then
   begin
    WizardForm.BorderStyle:=bsDialog;
    WizardForm.MainPanel.Visible:=False;
    WizardForm.Width:=ScaleX(320);
    WizardForm.Height:=ScaleY(127);
    WizardForm.InnerNotebook.Left:=ScaleX(7);
    WizardForm.InnerNotebook.Top:=ScaleY(7);
    WizardForm.InnerNotebook.Width:=ScaleX(300);
    WizardForm.StatusLabel.Left:=ScaleX(0);
    WizardForm.StatusLabel.Top:=ScaleY(0);
    WizardForm.StatusLabel.Width:=WizardForm.InnerNotebook.Width;
    WizardForm.FileNameLabel.Left:=ScaleX(0);
    WizardForm.FileNameLabel.Top:=ScaleY(17);
    WizardForm.FileNameLabel.Width:=WizardForm.InnerNotebook.Width;
    WizardForm.ProgressGauge.Top:=ScaleY(37);
    WizardForm.ProgressGauge.Left:=ScaleX(0);
    WizardForm.ProgressGauge.Width:=WizardForm.InnerNotebook.Width;
    WizardForm.CancelButton.Left:=ScaleX(122);
    WizardForm.CancelButton.Top:=ScaleY(70);
    WizardForm.Left:=GetSystemMetrics(16)-ScaleX(330);
    WizardForm.Top:=GetSystemMetrics(17)-ScaleX(110);
   end;
if CurPageID=wpFinished
 then
  begin
  WizardForm.Width:=502;{Размер окна по горизонтали}
  WizardForm.Height:=392;{Размер окна по вертикали}
  WizardForm.Position:=poScreenCenter; {Возврат в исходное состояние}
 end
end;