Перейти из форума на сайт.

НовостиФайловые архивы
ПоискАктивные темыТоп лист
ПравилаКто в on-line?
Вход Забыли пароль? Первый раз на этом сайте? Регистрация
Компьютерный форум Ru.Board » Компьютеры » Программы » Inno Setup (создание инсталяционных пакетов)

Модерирует : gyra, Maz

Widok (23-04-2007 18:02): лимит страниц. продолжаем здесь  Версия для печати • ПодписатьсяДобавить в закладки
Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108

   

haav



Junior Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору

 
 
Это мощное средство для создания установочных пакетов [дистрибутивов] программ. Поддерживается шифрование, установка пароля, различные задачи по завершении установки. Можно легко самим создавать диалоги, используя спец. дизайнер. И всё это абсолютно бесплатно! По сравнению с NullSoft [основной конкурент на бесплатной ниве] мне albel понравилась более интуитивно-понятная структура скрипта, простота в настройке.  
 
Последний релиз: 5.1.11 [1 Марта 2007 года]
История версий | скачать  
 
Русификатор от NightW0lf для версии 5.1.11  
Скачать | зеркало
 
Русская справка к версиям 5.0.xx
Скачать | зеркало || cкачать в .chm формате
И снова BagIra на высоте
 
Руководство по расширенным возможностям Inno Setup 5 [не для чайников] от Kindly
[3 версия]  
Скачать | зеркало
[4 версия]  
Скачать | зеркало
[5 версия]  
Скачать | зеркало
 
Inno Setup Extensions Knowledge Base  
Скачать | зеркало
 
Примечание: начиная с версии 5.1.10 в Inno Setup при использовании в инсталляторе фонового изображения формата BMP стало глючить возможность растягивания картинки на весь экран - чтобы это исправить добавьте этот код.
Если вы захотите использовать метод проверки внешнего файла через сумму MD5 [который описан в 5 версии руководства по программированию в Inno Setup] для запуска инсталлятора то вам понадобится калькулятор суммы MD5, калькулятор сумм MD5, SHA-256, CRC32. Если вы хотите узнать какие ключи в реестр вносит та или иная программа [или игра] то Вам понадобится RegShot.



Дополнительные утилиты для Inno Setup



ISTool
 
www.istool.org
 
Последний релиз: 5.1.8 [18 Октября 2006 года] New
Скачать | зеркало  
[как сказано в описании изменений, добавлена поддержка новых директив 5.1.8]
 
Русификатор
Скачать | зеркало


 
Распаковщик установок, сделанных с помощью Inno Setup. При распаковке извлекаются  ресурсы и скрипт установки [немного усечённый]. Возможно подключение к TotalCommander или FAR с помощью MultiArc плагинов.
 
Поддерживает распаковку инсталляторов, сделанных с помощью Inno Setup начиная с версии 3.0.0-beta по 5.1.10
 
Последний релиз: 0.19
Скачать | зеркало


 
Удобная оболочка для облегчения написания скриптов установки для INNO SETUP. Обладает некоторыми полезными функциями, которых нет ни у самого INNO, ни у ISTool.
 
Последний релиз: 5.1.6.9 [09 Июль 2006 года]
Скачать 4.2 мб | обновление 3.1 мб
 
Русификатор от GloThin
Скачать с сайта GloThin | Зеркало | Зеркало | зеркало
Пароль: ruboard
Примечание: офф. сайт косо отображается в Oper`е.
 
Новое название проекта на сайте, похоже произошла замена ScriptMaker на:
 
Inno Script Generator

Последний релиз: 1.02.5 [02 Апреля 2007 года]
Скачать | обновление
Примечание: обновление ставится только на Inno Setup Quickstartpack 5.1.11.

Всего записей: 67 | Зарегистр. 11-12-2001 | Отправлено: 15:23 09-10-2002 | Исправлено: NightW0lf, 15:16 15-04-2007
Sampron

Full Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Sero
Я заместь сплеш заставки использую видеоролик и мне нужно чтобы он отключался примено на секунду раньше от его полной длины чтоб небыло видно ненужного текста который нельзя никак отключить при конвертировании (можно также заместь слайд-шоу использовать видеоролик проверил пашет).

Всего записей: 563 | Зарегистр. 06-01-2007 | Отправлено: 22:45 13-04-2007
Sero



Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Sampron
Не понимаю почему у тебя не работет то что я писал...
 
Добавлено:
Обрати внимание на функцию Exec, TExecWait у тебя ewNoWait или ewWaitUntilTerminated,нужно чтобы было ewNoWait.

Всего записей: 309 | Зарегистр. 29-10-2006 | Отправлено: 23:00 13-04-2007
Sampron

Full Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Sero
Сюда выложил пример посмотри сам 1,4 мб :
http://rapidshare.com/files/25834151/VideoSplash.rar.html
 
Добавлено:
В твоём примере видео и окно инсталлятора появляется одновременно а мне нужно по очереди и Sleep(3000) не помогает или вообще не работает.

Всего записей: 563 | Зарегистр. 06-01-2007 | Отправлено: 23:36 13-04-2007
Sero



Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Sampron
Сделал!

Код:
 
[Files]
Source: Video.exe; DestDir: {tmp}; Flags: dontcopy
Source: ISTask.dll; Destdir: {tmp}; Flags: dontcopy
 
[Code]
function KillTask(ExeFileName: string): Integer;
external 'KillTask@files:ISTask.dll stdcall delayload';
 
procedure initializeWizard();
var
Res:Integer;
begin
WizardForm.Hide;
ExtractTemporaryFile('Video.exe');
Exec(ExpandConstant('{tmp}\Video.exe'),'','',SW_SHOW,ewNoWait,Res);
Sleep(5300);
KillTask('Video.exe')
WizardForm.Show;
end;

Всего записей: 309 | Зарегистр. 29-10-2006 | Отправлено: 00:30 14-04-2007 | Исправлено: Sero, 00:39 14-04-2007
Sampron

Full Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Sero
Спасибо! теперь работает.

Всего записей: 563 | Зарегистр. 06-01-2007 | Отправлено: 00:45 14-04-2007
Sero



Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Sampron

Цитата:
Sleep(3000) не помогает или вообще не работает.

Ты был ПРАВ ,вообще не работало.

Всего записей: 309 | Зарегистр. 29-10-2006 | Отправлено: 01:35 14-04-2007
Sampron

Full Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Sero
Сейчас проделываю тоже самое только заместь слайд-шоу и есть одна проблема, при нажатии на кнопку Отмена во время установки окно с потверждением на отмену находится за видеороликом. Незнаешь как можно сделать при нажатии на кнопку Отмена чтоб инсталлятор автоматически закрывался без потверждения?

Всего записей: 563 | Зарегистр. 06-01-2007 | Отправлено: 01:49 14-04-2007
Sero



Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Sampron

Код:
 
procedure CancelButtonClick(CurPageID: Integer; var Cancel, Confirm: Boolean);
begin
Confirm:=False;
Cancel:=True;
end;

 
 
 
Добавлено:
Пожалуйста скинь мне скрипт!

Всего записей: 309 | Зарегистр. 29-10-2006 | Отправлено: 02:36 14-04-2007
Sampron

Full Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Sero
http://rapidshare.com/files/25863609/Video.rar.html

Всего записей: 563 | Зарегистр. 06-01-2007 | Отправлено: 03:03 14-04-2007
Sero



Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Sampron
Спасибо!

Всего записей: 309 | Зарегистр. 29-10-2006 | Отправлено: 03:08 14-04-2007
Drez

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Есть скрипт новой страницы инно
[Setup]
AppName=Already Installed Page
AppVerName=Already Installed Page 1.0
CreateAppDir=no
Uninstallable=no
 
[Code]
var
  StaticText: TNewStaticText;
  RadioButton_1,RadioButton_2: TRadioButton;
  Uninstall,Location:string;
  ResultCode:Integer;
 
//Процедура NextButtonClick для новой страницы.
function Page_NextButtonClick(Page: TWizardPage): Boolean;
begin
if RegQueryStringValue(HKLM, 'SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\My Program_is1','UninstallString', Uninstall) then
Uninstall:=RemoveQuotes(Uninstall);
if RadioButton_1.Checked then
begin
if not Exec(Uninstall, ' /SILENT', '', SW_SHOW, ewWaitUntilTerminated, ResultCode) then
MsgBox('Ошибка удаления. ' #13#13 '' + SysErrorMessage(ResultCode) + '.' #13#13 'Вероятно, деинсталлятор был перемещен, удален или переименован.', mbError, MB_OK);
Result:=True;
end
else
begin
if not RadioButton_1.Checked then
Result:=True;
end;
end;
 
//Процедура CancelButtonClick для новой страницы.
procedure Page_CancelButtonClick(Page: TWizardPage; var Cancel, Confirm: Boolean);
begin
Confirm:=False;
Cancel:=True;
end;
 
//Эта процедура создает новую страницу и все что на нее находится
function CheckInstalledPage(PreviousPageId: Integer): Integer;
var
  Page: TWizardPage;
begin
RegQueryStringValue(HKLM, 'Software\Microsoft\Windows\CurrentVersion\Uninstall\My Program_is1','InstallLocation', Location)
Page := CreateCustomPage(PreviousPageId,'Previous Installation Found','Please choose how you want to proceed.');
//Текст на странице
StaticText := TNewStaticText.Create(Page);
StaticText.Parent := Page.Surface;
StaticText.Caption :='Inno Setup is already installed in'+' '+'"' + Location +'"'++'  '+'on your system.'#13+ 'It is recommended that you uninstall the current version before continuing.';
StaticText.Left := 0;
StaticText.Top := ScaleY(24);
StaticText.TabOrder := 0;
StaticText.AutoSize:=True;
//Первый RadioButton
RadioButton_1 := TRadioButton.Create(Page);
RadioButton_1.Parent := Page.Surface;
RadioButton_1.Caption := 'Uninstall ';
RadioButton_1.Left := 0;
RadioButton_1.Top := ScaleY(104);
RadioButton_1.Width := ScaleX(233);
RadioButton_1.Height := ScaleY(17);
RadioButton_1.Checked := True;
RadioButton_1.TabOrder := 1;
RadioButton_1.TabStop := True;
//Второй RadioButton
RadioButton_2 := TRadioButton.Create(Page);
RadioButton_2.Parent := Page.Surface;
RadioButton_2.Caption := 'reinstall';
RadioButton_2.Left := 0;
RadioButton_2.Top := ScaleY(144);
RadioButton_2.Width := ScaleX(153);
RadioButton_2.Height := ScaleY(17);
RadioButton_2.TabOrder := 2;
 
Page.OnNextButtonClick := @Page_NextButtonClick;
Page.OnCancelButtonClick := @Page_CancelButtonClick;
 
Result := Page.ID;
end;
 
procedure InitializeWizard();
begin
if RegQueryStringValue(HKLM, 'Software\Microsoft\Windows\CurrentVersion\Uninstall\My Program_is1','UninstallString', Uninstall) then
CheckInstalledPage(wpLicense);
//Если параметр регистра присутствует,будет создана новая страница
end;
 
 
как сделать так чтобы после нажатия кнопкт uninstall закрывалась программа установки и удалялась программа уже установленная?

Всего записей: 12 | Зарегистр. 09-11-2006 | Отправлено: 11:05 14-04-2007
Sero



Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Drez

Код:
 
[Code]
var
  StaticText: TNewStaticText;
  RadioButton_1,RadioButton_2: TRadioButton;
  Uninstall,Location:string;
  ResultCode:Integer;
  Page: TWizardPage;
 
function Page_NextButtonClick(Page: TWizardPage): Boolean;
begin
if RegQueryStringValue(HKLM, 'SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\Inno Setup 5_is1','UninstallString', Uninstall) then
Uninstall:=RemoveQuotes(Uninstall);
if RadioButton_1.Checked then
begin
if not Exec(Uninstall, ' /SILENT', '', SW_SHOW, ewNoWait, ResultCode) then
MsgBox('Uninstaller not found' #13#13 '' + SysErrorMessage(ResultCode) + '.' , mbError, MB_OK);
Result:=True;
WizardForm.Close;
end
else
begin
if not RadioButton_1.Checked then
Result:=True;
end;
end;
 
 
procedure Page_CancelButtonClick(Page: TWizardPage; var Cancel, Confirm: Boolean);
begin
Confirm:=False;
Cancel:=True;
end;
 
 
function CheckInstalledPage(PreviousPageId: Integer): Integer;
begin
RegQueryStringValue(HKLM, 'Software\Microsoft\Windows\CurrentVersion\Uninstall\Inno Setup 5_is1','InstallLocation', Location)
Page := CreateCustomPage(PreviousPageId,'Previous Installation Found','Please choose how you want to proceed.');
 
StaticText := TNewStaticText.Create(Page);
StaticText.Parent := Page.Surface;
StaticText.Caption :='Inno Setup is already installed in'+' '+'"' + Location +'"'++'  '+'on your system.'#13+ 'It is recommended that you uninstall the current version before continuing.';
StaticText.Left := 0;
StaticText.Top := ScaleY(24);
StaticText.TabOrder := 0;
StaticText.AutoSize:=True;
 
RadioButton_1 := TRadioButton.Create(Page);
RadioButton_1.Parent := Page.Surface;
RadioButton_1.Caption := 'Uninstall before continuing (recommended)';
RadioButton_1.Left := 0;
RadioButton_1.Top := ScaleY(104);
RadioButton_1.Width := ScaleX(233);
RadioButton_1.Height := ScaleY(17);
RadioButton_1.Checked := True;
RadioButton_1.TabOrder := 1;
RadioButton_1.TabStop := True;
 
RadioButton_2 := TRadioButton.Create(Page);
RadioButton_2.Parent := Page.Surface;
RadioButton_2.Caption := 'Overwrite current version';
RadioButton_2.Left := 0;
RadioButton_2.Top := ScaleY(144);
RadioButton_2.Width := ScaleX(153);
RadioButton_2.Height := ScaleY(17);
RadioButton_2.TabOrder := 2;
 
Page.OnNextButtonClick := @Page_NextButtonClick;
Page.OnCancelButtonClick := @Page_CancelButtonClick;
 
Result := Page.ID;
end;
 
procedure InitializeWizard();
begin
if RegQueryStringValue(HKLM, 'Software\Microsoft\Windows\CurrentVersion\Uninstall\Inno Setup 5_is1','UninstallString', Uninstall) then
CheckInstalledPage(wpLicense);
//Если параметр регистра присутствует,будет создана новая страница  
end;

 
P.S Откуда взял скрипт?

Всего записей: 309 | Зарегистр. 29-10-2006 | Отправлено: 14:24 14-04-2007 | Исправлено: Sero, 14:25 14-04-2007
Drez

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
отсюда =)
пишите по теме

Всего записей: 12 | Зарегистр. 09-11-2006 | Отправлено: 14:30 14-04-2007
kxox

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Как растянуть верхний правый рисунок по ширине? Как-то видел пример здесь, но не могу теперь найти((( Кто подскажет?

Всего записей: 4 | Зарегистр. 03-04-2007 | Отправлено: 14:37 14-04-2007
Sero



Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
kxox

Код:
 
[Code]
procedure InitializeWizard();
begin
WizardForm.WizardSmallBitmapImage.Left:=0;
WizardForm.WizardSmallBitmapImage.Width:=WizardForm.ClientWidth;
WizardForm.PageNameLabel.Visible:=False;
WizardForm.PageDescriptionLabel.Visible:=False;
end;


Всего записей: 309 | Зарегистр. 29-10-2006 | Отправлено: 14:47 14-04-2007
Sampron

Full Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
kxox
http://forum.ru-board.com/topic.cgi?forum=5&topic=4801&start=1860#13
 
Добавлено:
Sero
Смотрел код с видео? незнаешь как сделать чтоб панель задач не отображалась?

Всего записей: 563 | Зарегистр. 06-01-2007 | Отправлено: 14:51 14-04-2007
Sero



Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Sampron
Хммм... не знаю.

Всего записей: 309 | Зарегистр. 29-10-2006 | Отправлено: 16:59 14-04-2007
kxox

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Sero, Sampron, спасибо

Всего записей: 4 | Зарегистр. 03-04-2007 | Отправлено: 17:10 14-04-2007
Chuvakstepan



Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
Как сделать так чтобы на странице приветствия, инсталлятор проверял наличие игры в системе пользователя через реестр, и, если она есть вместо кнопки "Начать установку (как на скрине)" была кнопка "Играть", при нажатии на которую инсталлятор вырубался и включался exe игры (путь к exe будет в реестре)


Всего записей: 202 | Зарегистр. 29-01-2007 | Отправлено: 17:18 14-04-2007 | Исправлено: Chuvakstepan, 17:19 14-04-2007
NightW0lf



Full Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
2 All
 
Кто нибудь может помочь с написанием вот этого т.е. если игра уже установленна то приследующем запуске сетапа инсталлятор выдает такое сообщение.
 
P.S.: я предполагаю, что это надо сделать из этого кода:
Код

Всего записей: 479 | Зарегистр. 08-11-2006 | Отправлено: 17:29 14-04-2007 | Исправлено: NightW0lf, 17:30 14-04-2007
   

Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108

Компьютерный форум Ru.Board » Компьютеры » Программы » Inno Setup (создание инсталяционных пакетов)
Widok (23-04-2007 18:02): лимит страниц. продолжаем здесь


Реклама на форуме Ru.Board.

Powered by Ikonboard "v2.1.7b" © 2000 Ikonboard.com
Modified by Ru.Board
© Ru.Board 2000-2020

BitCoin: 1NGG1chHtUvrtEqjeerQCKDMUi6S6CG4iC

Рейтинг.ru