Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  | Правила  

Компьютерный форум OSzone.net » Автоматическая установка Windows » Автоматическая установка приложений » [архив] Inno Setup .:[все вопросы]:.

Закрытая тема
Настройки темы
[архив] Inno Setup .:[все вопросы]:.

Новый участник


Сообщения: 6
Благодарности: 2

Профиль | Отправить PM | Цитировать


Изменения
Автор: volk1234
Дата: 27-08-2009
Описание: перевел в архив
Лимит страниц.
Тема закрыта.
продолжаем тут:

Inno Setup. Обсуждение установщика

Скрипты Inno Setup. Помощь и советы



Полезные ресурсы:
Официальный сайт| Inno Setup 5.2.3 RU
Русская справка |Зеракало 1| Зеракало 2
ISTool 5.30 |Русификатор
Русификатор ISTool |Зеркало 1|Зеркало 2
Inno Setup Script Generator |Зеркало 1
Unpaker 2.1 от 21.04.2009 - распаковывает инсталляторы, созданные с помощью Inno Setup, начиная с версии 2.0.18 по 5.2.4.
InnoUnpaker 2.6b3 [от valeron87]- можнет просмотривать содержание CompiledCode.bin
Unpaker 0.23 - расширенная китайская версия 2008-08-08 ( модификация)
Unpacker 0.24 | Зеркало 1 | Зеркало 2 - Inno Setup Unpacker (innounp plus) - расширенная версия распаковщика инсталляторов Inno Setup начиная с версии 2.0.8 по 5.3.0 Beta. Поддерживаются версии Unicode. Русифицирована. Последний релиз: 0.24 [23.05.2009]
Набор Restools
Restools - расширенная версия Inno Setup от китайских разработчиков, добавляет вашему инсталлятору новые возможности по оформлению, а также более удобный редактор скриптов (требуется наличие установленного Preprocessor'а).
Последние версии разработок от Restools:
InnoCompiler090319_English - в него входят файлы: Compil32.exe и Templates.dat;
Inno_ISCmplr_Setup090302 - в него входят файлы, лучше из папки InnoSetup_FullVCL: setup.e32, ISCmplr.dls, ISCmplr.dll и SetupLdr.e32.
InnoCompiler090319_Russian - Русский перевод (80%) от tem000 - NEW !

QuickStart Pack - Inno Setup + Preprocessor (последняя версия ispack-5.2.4-dev)
"Всё в одном" от unikum111
читать дальше »

Цитата unikum111:
В сборку входят следующие компоненты:
Inno Setup compiler 5.2.2 русская версия;
ISTool 5.2.1 русская версия;
Inno Script Generator английская версия;
Inno Setup Unpacker Explorer 1.0 аглийская версия;
Примечание: в Inno Setup Unpacker Explorer 1.0 заменён innounp.exe на тестовую версию 2.0, так что распаковывает инсталляторы вплоть до версии 5.2.2.
Есть возможность выбора компонентов.
Скачать: ifolder, RapidShare, iBox (Размер: 5.34 Mb).»



Полезные мелочи для Inno Setup:

- Converter v.0.1.2 - конвертор REG- файлов в формат скриптов Inno от Serega_ -новая версия
- Как убрать страницу приветствия (wpWelcome) в мастере установки приложения:
- Примеры скриптов на паскале
- Inno Setup Addon 0.07 For Total Commander
- Параметры командной строки инсталляторов InnoSetup:

Код: Выделить весь код
/SP-
Отключает страницу "Эта программа установит... Вы хотите продолжить?" инсталятора. 
Выполнится только если DisableStartupPrompt секции [Setup] равна yes. 

/SILENT, /VERYSILENT  
Установка в ускоренном или очень ускоренном режиме. При установке в ускоренном режиме 
окно мастера и фоновое окно мастера не отображаются, отображается только окно прогресса. 
При очень ускоренной установке окно прогресса тоже не отображается. Остальная установка 
проходит как обычно - отображаются сообщения об ошибках в ходе установки, страница 
приветствия (если ее отображение не отменено директивой DisableStartupPrompt или 
параметром '/SP-' командной строки).

Если после установки необходима перезагрузка, команды '/NORESTART' не дано и установка 
проходит в ускоренном режиме, появится сообщение "Перезагрузить компьютер?". Если режим 
установки очень ускоренный, система перезагрузится не спрашивая.

/LOG 
Указывает инсталятору создать log-файл в папке TEMP для подробного отчета о действиях 
и событиях в секции [Run], предпринятых в ходе установки. Применяется при отслеживании 
ошибок. Например, если вы подозреваете, что файл не был удален, хотя должен был, 
log-файл сообщит, что файл былдействительно пропущен и почему. 

log-файлу присваивается уникальное имя на базе текущей даты. (Существующие файлы не 
перезаписываются и не дополняются). 
Информация, содержащаяся в log-файле, техническая и поэтому не может быть понята 
пользователем. 

/LOG="filename" 
Параметр похож на /LOG, но в отличие от него позволяет указать фиксированный
путь/имя файла для log-файла. Если файл с указанным именем уже существует, он будет 
заменен. Если файл не может быть создан, установка прервется и выдаст сообщение 
об ошибке.

/NOCANCEL  
Не дает пользователю прервать установку, отключая кнопку Отменить и игнорируя клики на 
кнопке Закрыть. Используется в комбинации с '/SILENT' или '/VERYSILENT'. 

/NORESTART 
Указывает инсталятору не перезагружать компьютер даже если это необходимо. 

/RESTARTEXITCODE=exit code  
Задает инсталятору код, который он должен возвратить, если необходима перезагрузка. 
Используется с '/NORESTART'.
См. также Коды выхода инсталятора. (кому интерестно, могу выложить или же доступно в хелпе)

/LOADINF="filename" 
Указывает инсталятору загрузить параметры установки из указанного файла после проверки 
командной строки. Этот файл может быть подготовлен с помощью '/SAVEINF='command.
Не забудьте ставить кавычки при использовании имен, содержащих пробелы. 

/SAVEINF="filename" 
Указывает инсталятору сохранять параметры установки в указанный файл.
Не забудьте ставить кавычки при использовании имен, содержащих пробелы. 

/LANG=language 
Задает используемый язык. language задает имя языка, заданного в параметре секции 
[Languages]. При использовании параметра /LANG появляется диалог Выбор языка установки.

/DIR="x:\dirname" 
Меняет имя папки, заданное по умолчанию, на странице Выбор папки назначения. 
Должен быть задан полный путь. 

/GROUP="folder name" 
Меняет имя папки на странице Выбор папки меню Пуск. Если директива 
DisableProgramGroupPage секции [Setup] равна yes, этот параметр командной строки 
игнорируется. 

/NOICONS 
Указывает инсталятору проверять, выбрана ли команда Не создавать значков на странице 
Выбор папки меню Пуск. 

/COMPONENTS="comma separated list of component names" 
Меняет выбраные по умолчанию компоненты. В этом случае параметр командной строки 
указывает инсталятору менять тип установки на Выборочный. 

/PASSWORD=password  Задает пароль. Если не указана директива Password секции [Setup], 
этот параметр игнорируется. Если введен неправильный пароль, параметр 
также игнорируется.

Отправлено: 21:42, 17-03-2005

 

Ветеран


Сообщения: 1133
Благодарности: 580

Профиль | Отправить PM | Цитировать


AnalogXP, значит из этой папки во время удаления запущен какой-то процесс... Попробуйте выяснить какой процесс запущен и используйте для него:
DelayDeleteFile(ExpandConstant('{app}\FileName'), 2);
Цитата из Справки:
procedure DelayDeleteFile(const Filename: String; const Tries: Integer);
Описание:
Попытается удалить Filename, повторяя попытки Tries раз, если файл используется. Задержка между попытками - 250 мсек.

-------
Книги нужны, чтобы напоминать человеку, что его оригинальные мысли не так уж новы... Авраам Линкольн.


Отправлено: 16:44, 02-04-2009 | #551



Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети.

Если же вы забыли свой пароль на форуме, то воспользуйтесь данной ссылкой для восстановления пароля.


Новый участник


Сообщения: 15
Благодарности: 0

Профиль | Отправить PM | Цитировать


Цитата Serega_:
AnalogXP, значит из этой папки во время удаления запущен какой-то процесс... Попробуйте выяснить какой процесс запущен и используйте для него: »
Там остается только одна пустая папка 'language'. Из нее файлы также удаляются а вот сама...

Кстате предыдущий код вообще не компилируется (прошу прощения за ошибку). Вот измененный:
Код: Выделить весь код
if DirExists('{app}') = True then
				DelTree('{app}', True, True, True);
Но как уже сказал папка программы и вложенная, остаются.

Отправлено: 17:44, 02-04-2009 | #552


Ветеран


Сообщения: 1133
Благодарности: 580

Профиль | Отправить PM | Цитировать


Вот, реализовал интересный эффект - эффект печатной машинки, т.е. текст на мастере появляется не сразу, а по одной букве, что создаёт эффект того, что текст печатается...
Скрипт
Код: Выделить весь код
; Интересный эффект для Вашего инсталлятора, эффект печатной машинки...
; Для нормальной работы у Вас должен быть установлен набор от Restools http://restools.hanzify.org/
; Подразумеваю под словом набор - InnoCompiler и ISCmplr, последние версии Вы можете найти на сайте Restools.
; Автор: Serega, http://forum.oszone.net/member.php?userid=88670

[Setup]
AppName=My Program
AppVerName=My Program v 1.5
DefaultDirName={pf}\My Program
OutputDir=.
Compression=lzma/ultra
InternalCompressLevel=ultra
SolidCompression=yes

Code]
var
  lbl1, lbl2: TLabel;
  txt1, txt2: string;
  i: Integer;
  tmr1: TTimer;

procedure tmr1Timer(Sender: TObject);
begin
  tmr1.Enabled:= False;

  txt1:= WizardForm.WelcomeLabel1.Caption;
  txt2:= WizardForm.WelcomeLabel2.Caption;

  lbl1.Caption:= '';
  for i:= 1 to Length(txt1) do begin
    if Application.Terminated then Break; // контроль закрытия приложения и выход из цикла
    lbl1.Caption:= lbl1.Caption + txt1[i];
    Application.ProcessMessages;
    Sleep(100); // время задержки между показом букв
  end;

  lbl2.Caption:= '';
  for i:= 1 to Length(txt2) do begin
    if Application.Terminated then Break; // контроль закрытия приложения и выход из цикла
    lbl2.Caption:= lbl2.Caption + txt2[i];
    Application.ProcessMessages;
    Sleep(60); // время задержки между показом букв
  end;
end;

procedure CreateComponents;
begin
// скрываем стандартные Label'ы
  WizardForm.WelcomeLabel1.Hide;
  WizardForm.WelcomeLabel2.Hide;

// задаём свои Label'ы
  lbl1:= TLabel.Create(WizardForm);
  with lbl1 do begin
    Left:= WizardForm.WelcomeLabel1.Left;
    Top:= WizardForm.WelcomeLabel1.Top;
    Width:= WizardForm.WelcomeLabel1.Width;
    Height:= WizardForm.WelcomeLabel1.Height;
    AutoSize:= WizardForm.WelcomeLabel1.AutoSize;
    WordWrap:= WizardForm.WelcomeLabel1.WordWrap;
    Font.Style:= WizardForm.WelcomeLabel1.Font.Style;
    Font.Size:= WizardForm.WelcomeLabel1.Font.Size;
    Font.Color:= WizardForm.WelcomeLabel1.Font.Color;
    Transparent:= True;
    Caption:= '';
    Parent:= WizardForm.WelcomePage;
  end;

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

  tmr1:= TTimer.Create(WizardForm);
  with tmr1 do begin
    Interval:= 500; // время задержки перед началом показа текста
    OnTimer:= @tmr1Timer;
  end;
end;

procedure InitializeWizard();
begin
  CreateComponents;
end;

-------
Книги нужны, чтобы напоминать человеку, что его оригинальные мысли не так уж новы... Авраам Линкольн.


Последний раз редактировалось Serega, 08-06-2009 в 22:36. Причина: орфография

Это сообщение посчитали полезным следующие участники:

Отправлено: 18:24, 02-04-2009 | #553


Новый участник


Сообщения: 15
Благодарности: 0

Профиль | Отправить PM | Цитировать


Код: Выделить весь код
[Setup]
; NOTE: The value of AppId uniquely identifies this application.
; Do not use the same AppId value in installers for other applications.
; (To generate a new GUID, click Tools | Generate GUID inside the IDE.)
AppName=MyProgramName
AppVerName=MyProgramName 3.1
AppPublisher=MyCompany
DefaultDirName={pf}\MyProgramName 
DefaultGroupName=MyProgramName 
AllowNoIcons=yes
OutputDir=E:\Install\Programe\Programa\MyProgramName
OutputBaseFilename=MyProgramName_3.1
SetupIconFile=E:\Install\Programe\Programa\MyProgramName \in.ico
Uninstallable=yes
UninstallDisplayIcon={app}\unins000.exe, 2
Compression=lzma/ultra
InternalCompressLevel=ultra
SolidCompression=yes

[Languages]
Name: english; MessagesFile: compiler:Default.isl

[Tasks]
Name: desktopicon; Description: {cm:CreateDesktopIcon}; GroupDescription: {cm:AdditionalIcons}; Flags: unchecked
Name: quicklaunchicon; Description: {cm:CreateQuickLaunchIcon}; GroupDescription: {cm:AdditionalIcons}; Flags: unchecked

[Files]
Source: E:\Install\Programe\Programa\MyProgramName\Installer\MyProgramName .exe; DestDir: {app}; Flags: ignoreversion
Source: E:\Install\Programe\Programa\MyProgramName\Installer\LICENSE.TXT; DestDir: {app}; Flags: ignoreversion
Source: E:\Install\Programe\Programa\MyProgramName\Installer\sqlite3.dll; DestDir: {app}; Flags: ignoreversion
Source: E:\Install\Programe\Programa\MyProgramName\Installer\VIcon.bin; DestDir: {app}; Flags: ignoreversion
Source: E:\Install\Programe\Programa\MyProgramName\Installer\Feedback.exe; DestDir: {app}; Flags: ignoreversion
Source: E:\Install\Programe\Programa\MyProgramName\Installer\language\*; DestDir: {app}\language; Flags: ignoreversion recursesubdirs
Source: E:\Install\Programe\Programa\MyProgramName\Installer\un.ico; DestDir: {app}; Flags: ignoreversion
; NOTE: Don't use "Flags: ignoreversion" on any shared system files

[Icons]
Name: {group}\MyProgramName ; Filename: {app}\MyProgramName.exe
Name: {group}\{cm:ProgramOnTheWeb,MyProgramName }; Filename: http://www.mycompany.com/
Name: {group}\{cm:UninstallProgram,MyProgramName }; Filename: {uninstallexe}; IconFilename: {app}\un.ico
Name: {commondesktop}\MyProgramName; Filename: {app}\MyProgramName.exe; Tasks: desktopicon
Name: {userappdata}\Microsoft\Internet Explorer\Quick Launch\MyProgramName; Filename: {app}\MyProgramName.exe; Tasks: quicklaunchicon

[Run]
Filename: {app}\MyProgramName.exe; Description: {cm:LaunchProgram,MyProgramName}; Flags: nowait postinstall skipifsilent

[Registry]
Root: HKCU; Subkey: Software\MyProgramName\Options\Position; Flags: uninsdeletekey

[UninstallRun]
Filename: {app}\Feedback.exe; Flags: waituntilterminated

[_Code]
procedure CurUninstallStepChanged(CurUninstallStep: TUninstallStep);
begin
  If CurUninstallStep = usDone then  // проверяем существование папки после удаления программы
  begin
	if DirExists(ExpandConstant('{userappdata}\MyProgramName')) = True then  
		DelTree(ExpandConstant('{userappdata}\MyProgramName'), True, True, True);  
	if DirExists('{app}') = True then
		DelTree('{app}', True, True, True);
  end;
end;

Отправлено: 19:38, 02-04-2009 | #554


Ветеран


Сообщения: 1133
Благодарности: 580

Профиль | Отправить PM | Цитировать


AnalogXP, в скрипте, у вас всё нормально, по крайней мере ошибок я не нашёл. Единственное, что в секции [Files], я бы записал так:
читать дальше »

Код: Выделить весь код
.........
[Files]
Source: E:\Install\Programe\Programa\MyProgramName\Installer\*; DestDir: {app}; Flags: ignoreversion createallsubdirs recursesubdirs
........
т.е. все файлы в одной строке. Если в папке Installer или её подпапках есть файлы, которые не надо включать в инсталлятор, то нужно использовать Excludes:
Код: Выделить весь код
.........
[Files]
Source: E:\Install\Programe\Programa\MyProgramName\Installer\*; Excludes: FileName1.exe, FileName2.exe; DestDir: {app}; Flags: ignoreversion createallsubdirs recursesubdirs
........
т.е. перечисляем файлы через запятую, так же можно использовать переменные - *.txt

Да и используйте в своих сообщениях тег [ more][/more]

Хотя попробуете добавить ещё раз DelTree, т.е.
читать дальше »
Код: Выделить весь код
procedure CurUninstallStepChanged(CurUninstallStep: TUninstallStep);
begin
  If CurUninstallStep = usDone then  // проверяем существование папки после удаления программы
  begin
	  if DirExists(ExpandConstant('{userappdata}\MyProgramName')) = True then
		DelTree(ExpandConstant('{userappdata}\MyProgramName'), True, True, True);
	  if DirExists('{app}') = True then begin
		  DelTree('{app}', True, True, True);
		  DelTree('{app}', True, True, True);
    end;
  end;
end;

-------
Книги нужны, чтобы напоминать человеку, что его оригинальные мысли не так уж новы... Авраам Линкольн.

Это сообщение посчитали полезным следующие участники:

Отправлено: 21:55, 02-04-2009 | #555


Новый участник


Сообщения: 15
Благодарности: 0

Профиль | Отправить PM | Цитировать


Цитата Serega_:
т.е. все файлы в одной строке. »
Спасибо, я об этом знаю, просто у меня там действительно еще много лишних файлов для дистрибутива.

Что посоветуете, делать с папкой? Так и не хочет удалится. Как найти причину!?

Отправлено: 21:58, 02-04-2009 | #556


Ветеран


Сообщения: 1133
Благодарности: 580

Профиль | Отправить PM | Цитировать


AnalogXP, вы второй раз использовали DelTree?

-------
Книги нужны, чтобы напоминать человеку, что его оригинальные мысли не так уж новы... Авраам Линкольн.


Отправлено: 22:03, 02-04-2009 | #557


Новый участник


Сообщения: 15
Благодарности: 0

Профиль | Отправить PM | Цитировать


Ну так в примере выше все указал. Вот как стараюсь удалить:

Код: Выделить весь код
[_Code]
procedure CurUninstallStepChanged(CurUninstallStep: TUninstallStep);
begin
  If CurUninstallStep = usDone then  // проверяем существование папки после удаления программы
  begin
	if DirExists(ExpandConstant('{userappdata}\MyProgramName')) = True then  
		DelTree(ExpandConstant('{userappdata}\MyProgramName'), True, True, True);  
	if DirExists('{app}') = True then
		DelTree('{app}', True, True, True);
  end;
end;
Проверяю если есть папка в Application Data и удаляю.
Проверяю если есть папка программы и также пробую удалить.
А вообще, когда вызывается эта процедура?

Отправлено: 00:21, 03-04-2009 | #558


Ветеран


Сообщения: 1133
Благодарности: 580

Профиль | Отправить PM | Цитировать


AnalogXP, я добавил в прошлое сообщение пример с кодом. Посмотрите внимательней... Там DelTree используется два раза. Попробуйте.

-------
Книги нужны, чтобы напоминать человеку, что его оригинальные мысли не так уж новы... Авраам Линкольн.

Это сообщение посчитали полезным следующие участники:

Отправлено: 00:45, 03-04-2009 | #559


Новый участник


Сообщения: 15
Благодарности: 0

Профиль | Отправить PM | Цитировать


Цитата Serega_:
AnalogXP, я добавил в прошлое сообщение пример с кодом. Посмотрите внимательней... Там DelTree используется два раза. Попробуйте. »
Хе-хе, прозевал
Работает спасибо!

Отправлено: 02:44, 03-04-2009 | #560



Компьютерный форум OSzone.net » Автоматическая установка Windows » Автоматическая установка приложений » [архив] Inno Setup .:[все вопросы]:.

Участник сейчас на форуме Участник сейчас на форуме Участник вне форума Участник вне форума Автор темы Автор темы Шапка темы Сообщение прикреплено

Похожие темы
Название темы Автор Информация о форуме Ответов Последнее сообщение
Inno Setup. Прочие вопросы El Sanchez Автоматическая установка приложений 629 14-12-2020 20:08
Утилиты - [addon] Inno Setup CrOsP Наборы обновлений для Windows XP/2003/Windows 7 33 11-05-2011 16:03
Inno Setup 5.3.6 OSZone Software Новости программного обеспечения 0 15-11-2009 17:30
[Архив] Твики реестра .: [все вопросы] :. Vadikan Автоматическая установка Windows 2000/XP/2003 1431 26-01-2008 08:51
Inno Setup tradeukraine Вебмастеру 3 13-06-2006 20:39




 
Переход