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

НовостиФайловые архивы
ПоискАктивные темыТоп лист
ПравилаКто в 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
KeyGen



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

Цитата:
...так чтобы при запуске инсталлятора происходила проверка на наличие Microsoft .NET Framework 2.0 в системе

 
 
Тут при распаковке одной программы обнаружил такой скриптик
 
Там правда описывается для версии 1.1, но кое что почерпнуть можно.
 
 
Программа Inno Script Generator обновилась до версии 1.0.2.5 (02. April 2007)
 
Если вдруг кому то захочется перевести эту программу, то:
1. Качаем DKLang Localization Package (Прога бесплатная) _http://www.dk-soft.org/download.php?lang=ru&cat_id=4
2. В папке с Inno Script Generator находится файл InnoScriptGenerator.dklang (Его используем в качестве исходного языкового файла)
3. Дальше либо создаём новый файл перевода, либо берём мой _http://filepost.ru/?act=files&id=3340218 или _http://keygen.ifolder.ru/1559987 (перевёл немного для проверки софтины).

Всего записей: 1220 | Зарегистр. 20-06-2005 | Отправлено: 02:34 03-04-2007 | Исправлено: KeyGen, 04:28 03-04-2007
maxdddca123

Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
Всем привет, такой вопрос. Мне после установки надо, что бы выполнялась команда copy /b key.pub DBKeys.pub Как это лучше реализовать ?

Всего записей: 211 | Зарегистр. 14-12-2006 | Отправлено: 07:18 03-04-2007 | Исправлено: maxdddca123, 07:18 03-04-2007
Genri

Advanced Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
NightW0lf
Цитата:
при запуске инсталлятора происходила проверка на наличие Microsoft .NET Framework  

 
http://forum.ru-board.com/topic.cgi?forum=5&topic=4801&start=1360#7

Всего записей: 872 | Зарегистр. 06-09-2003 | Отправлено: 11:29 03-04-2007
kxox

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Приветы.
Как проверить свободное место на диске с помощью IS?
Т.е. как сделать чтобы в форме где происходит выбор директории для установки, а также показывается количество необходимого места, также отображалось количество свободного места на диске, на который предполагается установка, и как запретить установку (По нажатию Далее мсгбокс с фразой "Не хватает места", и возврат на форму) в этом случае?

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

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

Цитата:
Как проверить свободное место на диске

В хелпе смотри описание функции GetSpaceOnDisk

Всего записей: 872 | Зарегистр. 06-09-2003 | Отправлено: 17:12 03-04-2007
NightW0lf



Full Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Genri
Спасибо за подсказку с Microsoft .NET Framework - разобрался!
Вот код
 
Кто-нибудь может помочь с этим.

Всего записей: 479 | Зарегистр. 08-11-2006 | Отправлено: 20:11 03-04-2007 | Исправлено: NightW0lf, 20:31 03-04-2007
Genri

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

Код:
 
[Setup]
AppName=My Program
AppVerName=My Program version 1.5
DefaultDirName={pf}\My Program
 
[Files]
Source: Files\*; DestDir: {app}
 
[Code]
const
  NeedSize = 20; //Прописать, сколько мегабайт необходимо
   
  DRIVE_UNKNOWN = 0;
  DRIVE_NO_ROOT_DIR = 1;
  DRIVE_REMOVEABLE = 2;
  DRIVE_FIXED = 3;
  DRIVE_REMOTE = 4;
  DRIVE_CDROM = 5;
  DRIVE_RAMDISK = 6;
   
function GetLogicalDrives: DWORD;
external 'GetLogicalDrives@kernel32.dll stdcall';
 
function GetDriveType(nDrive: String): Longint;
external 'GetDriveTypeA@kernel32.dll stdcall';
 
procedure InitializeWizard();
var
  Path: String;
  FreeMB, TotalMB: Cardinal;
  ListBox: TListBox;
  drives: DWORD;
  i: integer;
begin
  ListBox:= TListBox.Create(WizardForm);
  ListBox.Top:= 120;
  ListBox.Width:= 300;
  ListBox.Height:= ScaleY(90);
  ListBox.Parent:= WizardForm.SelectDirPage;
   
  drives:= GetLogicalDrives();
  for i:= 0 to 31 do
     begin
        if (drives and (1 shl i)) > 0 then
            begin
              Path:= chr(ord('A')+i)+':';
              if GetDriveType(Path) = DRIVE_FIXED then
                begin
                  GetSpaceOnDisk(Path, True, FreeMB, TotalMB);
                  ListBox.Items.Add(Path + ' - Всего: ' + IntToStr(TotalMB) +
                                 'Мб - Свободно: ' + IntToStr(FreeMB) + 'Мб');
                end;
            end;
     end;
end;
 
function NextButtonClick(CurPageID: Integer): Boolean;
var
  Path: String;
  FreeMB, TotalMB: Cardinal;
begin
  Result:= True;
  if CurPageID = wpSelectDir then
    begin
      Path:= ExtractFileDrive(WizardForm.DirEdit.Text);
      GetSpaceOnDisk(Path, True, FreeMB, TotalMB);
      if FreeMB < NeedSize then
        begin
          MsgBox('Недостаточно места на диске!', mbInformation, MB_OK)
          Result:= False;
        end;
    end;
end;
 


Всего записей: 872 | Зарегистр. 06-09-2003 | Отправлено: 22:15 03-04-2007
maxdddca123

Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
Genri
А как мне сделат произвольную страницу после установки, что бы на ней отображалась только bmp картинка ?

Всего записей: 211 | Зарегистр. 14-12-2006 | Отправлено: 22:40 03-04-2007
NightW0lf



Full Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Genri
Спасибо!
Но еще один вопрос на эту же тему:
Можно ли сделать точно так же как у S.T.A.L.K.E.R. и чтобы при нажатии [из этого списка дисков] на один из локальных дисковего его буква прописывалась в путь установки? Т.е. например путь установки по умолчанию "C:\Program Files\My game", а при выборе например локального диска "E:" [из этого списка локальных дисков] путь становился таким "E:\Program Files\My game".
 
Буду очень признателен запомощь!

Всего записей: 479 | Зарегистр. 08-11-2006 | Отправлено: 22:48 03-04-2007
Sampron

Full Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
maxdddca123
[Code]
var
  Page: TWizardPage;
  BitmapImage: TBitmapImage;
 
procedure InitializeWizard();
begin
 ExtractTemporaryFile('Image.bmp')
 Page:=CreateCustomPage(wpInstalling, 'Картинка', 'Тут что-то еще написать можно!')
 BitmapImage:=TBitmapImage.Create(Page)
 with BitmapImage do begin
   Left:=0
   Top:=0
   Width:=417
   Height:=237
   Parent:=Page.Surface
   Bitmap.LoadFromFile(ExpandConstant('{tmp}')+'\Image.bmp')
 end
end;
 
Добавлено:
[Files]
Source: C:\Image.bmp; DestDir: {tmp}; Flags: dontcopy

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

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

Код:
 
[Setup]
AppName=My Program
AppVerName=My Program version 1.5
DefaultDirName={pf}\My Program
 
[Files]
Source: Files\*; DestDir: {app}
 
[Сode]
const
  NeedSize = 20; //Прописать, сколько мегабайт необходимо
 
  DRIVE_UNKNOWN = 0;
  DRIVE_NO_ROOT_DIR = 1;
  DRIVE_REMOVEABLE = 2;
  DRIVE_FIXED = 3;
  DRIVE_REMOTE = 4;
  DRIVE_CDROM = 5;
  DRIVE_RAMDISK = 6;
 
var
  ListBox: TListBox;
   
function GetLogicalDrives: DWORD;
external 'GetLogicalDrives@kernel32.dll stdcall';
 
function GetDriveType(nDrive: String): Longint;
external 'GetDriveTypeA@kernel32.dll stdcall';
 
procedure ListBoxOnClick(Sender: TObject);
var
  NewLetter, OldString: String;
  i: Integer;
begin
  for i:= 0 to ListBox.Items.Count-1 do
    begin
      if ListBox.Selected[i] then
        begin
          NewLetter:= Copy(ListBox.Items[i], 0, 1);
          OldString:= Copy(WizardForm.DirEdit.Text, 2, Length(WizardForm.DirEdit.Text));
          WizardForm.DirEdit.Text:= NewLetter + OldString;
        end;
    end;
end;
 
procedure InitializeWizard();
var
  Path: String;
  FreeMB, TotalMB: Cardinal;
  drives: DWORD;
  i: integer;
begin
  ListBox:= TListBox.Create(WizardForm);
  ListBox.Top:= 120;
  ListBox.Width:= 300;
  ListBox.Height:= ScaleY(90);
  ListBox.Parent:= WizardForm.SelectDirPage;
  ListBox.OnClick:= @ListBoxOnClick;
   
  drives:= GetLogicalDrives();
  for i:= 0 to 31 do
     begin
        if (drives and (1 shl i)) > 0 then
            begin
              Path:= chr(ord('A')+i)+':';
              if GetDriveType(Path) = DRIVE_FIXED then
                begin
                  GetSpaceOnDisk(Path, True, FreeMB, TotalMB);
                  ListBox.Items.Add(Path + ' - Всего: ' + IntToStr(TotalMB) +
                                 'Мб - Свободно: ' + IntToStr(FreeMB) + 'Мб');
                end;
            end;
     end;
end;
 
function NextButtonClick(CurPageID: Integer): Boolean;
var
  Path: String;
  FreeMB, TotalMB: Cardinal;
begin
  Result:= True;
  if CurPageID = wpSelectDir then
    begin
      Path:= ExtractFileDrive(WizardForm.DirEdit.Text);
      GetSpaceOnDisk(Path, True, FreeMB, TotalMB);
      if FreeMB < NeedSize then
        begin
          MsgBox('Недостаточно места на диске!', mbInformation, MB_OK)
          Result:= False;
        end;
    end;
end;
 

maxdddca123 -- не слишком люблю с картинками возиться, да и времени особо нет. Может позже.

Всего записей: 872 | Зарегистр. 06-09-2003 | Отправлено: 01:23 04-04-2007
Sampron

Full Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Genri
У меня этот код не работает в нём даже подсветки синтаксиса нет.
 
Добавлено:
Всё работает в слове [Сode] был русский символ.

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



Platinum Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Genri
А вот с этим не поможешь при случае?
 
Заранее спасибо!

Всего записей: 25258 | Зарегистр. 09-06-2004 | Отправлено: 08:18 04-04-2007
maxdddca123

Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
Sampron
Спасибо, а  картинка максимум    Width:=417  
   Height:=237 размера  ? Мне бы побольше надо. Тут можно бОльшие цифры написать ?

Всего записей: 211 | Зарегистр. 14-12-2006 | Отправлено: 09:51 04-04-2007 | Исправлено: maxdddca123, 10:12 04-04-2007
Sampron

Full Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
maxdddca123
На новой странице я не смог это сделать но можно сделать на готовой странице wpInfoAfter и в инсталлятор прийдётся включать пустой текстовый файл но отображатся он не будет.
[Setup]
InfoAfterFile=C:\text.txt
 
[Files]
Source: C:\Image.bmp; DestDir: {tmp}; Flags: dontcopy
 
[Code]
var
  BitmapImage: TBitmapImage;
 
procedure CurPageChanged(CurPageID: Integer);
begin
If CurPageID=wpInfoAfter then
 begin
 ExtractTemporaryFile('Image.bmp')
 BitmapImage:=TBitmapImage.Create(WizardForm)
 with BitmapImage do begin
   Left:=0
   Top:=0
   Width:=497
   Height:=313
   Parent:=WizardForm.InfoAfterPage
   Bitmap.LoadFromFile(ExpandConstant('{tmp}')+'\Image.bmp')
 end
   WizardForm.InnerNotebook.Top:=0
   WizardForm.InnerNotebook.Left:=0
   WizardForm.InnerNotebook.Width:=497
   WizardForm.InnerNotebook.Height:=313
   WizardForm.MainPanel.Visible:=False
   WizardForm.Bevel1.Visible:=False
   WizardForm.InfoAfterMemo.Visible:=False
   WizardForm.InfoAfterClickLabel.Visible:=False
end
end;

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



Full Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Genri
СПАСИБО тебе за твои труды!

Всего записей: 479 | Зарегистр. 08-11-2006 | Отправлено: 14:56 04-04-2007
lodoss

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Привет всем, о Inno Setup недавно узнал, начинающий
подскажите пожалуйста,  какой программкой можно отследить все изменения в системе при установке какой либо программы?
 
PS Можно  на форуме открыть сразу все 95 страниц в одной ?, а то по одной просматривать неудобно

Всего записей: 1 | Зарегистр. 04-04-2007 | Отправлено: 18:06 04-04-2007
GloThin



Тобольский шашлычник
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
lodoss
20:06 04-04-2007
Цитата:
PS Можно  на форуме открыть сразу все 95 страниц в одной ?, а то по одной просматривать неудобно  

Можно:  
Таким образом  
 

----------
Все принципиальное-просто,а все простое-принципиально!
На каждого мудреца достаточно простоты!
Не изменишь существующее,не изменив себя!!

Всего записей: 699 | Зарегистр. 28-04-2004 | Отправлено: 18:54 04-04-2007
Sero



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

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

 
RegShot
Скачать  
(55Kb)

Всего записей: 309 | Зарегистр. 29-10-2006 | Отправлено: 19:27 04-04-2007 | Исправлено: Sero, 19:33 04-04-2007
NightW0lf



Full Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Genri
А не сможешь помочь с реализацией вот этого тоже из S.T.A.L.K.E.R.

Всего записей: 479 | Зарегистр. 08-11-2006 | Отправлено: 20:41 04-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