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

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

Закрытая тема
Настройки темы
[архив] Скрипты Inno Setup. Помощь и советы [часть 2]

Ветеран


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


Конфигурация

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


Изменения
Автор: jameszero
Дата: 08-11-2010
Описание: тема закрыта
Лимит страниц.
Тема закрыта.
Продолжение по ссылке Скрипты Inno Setup. Помощь и советы [часть 3]




Внимание! Данная тема предназначена только для обсуждения написания скриптов !
Остальные вопросы, а также последние версии компилятора в теме
Inno Setup. Прочие вопросы.


Показать/скрыть: Справка, руководство, примеры:
Показать/скрыть: Ссылки на примеры скриптов:
Показать/скрыть: Дополнительные программы для Inno Setup:
  • ISTool - неплохой редактор скриптов Inno Setup.
    Последняя версия: 5.3.0.1 [29.09.2009] - Скачать | зеркало;
    Предыдущая версия: 5.3.0 [07.04.2009] - Скачать (зеркало) | Русификатор (зеркало);

  • Inno Script Generator - ещё один редактор скриптов Inno Setup. Обладает некоторыми полезными функциями, которых нет ни у самого Inno Setup, ни у ISTool.
    Последняя версия: 1.0.3.1 [23.03.2008] - Скачать;

  • Inno Setup Form Designer - редактор страниц Inno Setup, можно создавать свои страницы. Официальный сайт - недоступен.
    Последняя версия: 2.0.8 [12.11.2006] - Страница с зеркалами;

  • Inno Setup GameScript Generator - программа генерирует скрипты для Inno Setup . С помощью GameScript Generator и Inno Setup вы сможете быстро создать простенький инсталляционный пакет для любой игры. В инсталлятор можно встроить музыку, слайдшоу и фоновый рисунок. Для специалистов созданный скрипт, возможно, будет неплохой заготовкой для дальнейшей модернизации;

  • ISSkin - Программа для создания и добавления в инсталлятор скинов. Инструкция.
    Последняя версия: 3.0.0.0 [19.01.2010] - Скачать;

  • InnoSetup Script Joiner - Программа для объединения нескольких скриптов InnoSetup в один;

  • Converter - Программа конвертирует reg-файлы в формат *.iss (формат скриптов Inno Setup).
    Последняя версия: 0.1.3 [11.09.2009] - Скачать;


Ссылка на архив предыдущей темы (также можно скачать из вложения)

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


Отправлено: 22:06, 23-08-2009

 

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


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

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


Люди помогите с проблемой, делаю новую страницу, все что в ней надо сделать, сделал, а как на ней разместить все "галочки" не пойму, они появляются на предыдущей странице...это вырезка из кода:

Код: Выделить весь код
[Tasks]
Name: "desktopicon"; Description: "Create &desktop icons"; GroupDescription: "Additional icons:"; MinVersion: 4,4
Name: Toolbar; Description: "Instal Toolbar"; GroupDescription: "WWW";


[Co&de]
var
  Page: TWizardPage;
procedure InitializeWizard();
begin
  Page:= CreateCustomPage(wpInstalling, 'Realore Toolbar Installation', 'Thank you for choosing to install GAMENAME. After installation of the application, you can also get the official Realore toolbar. The toolbar gives you instant access to cool tools like radio, weather, e-mail notifier and more.');
end;

Отправлено: 17:21, 27-11-2009 | #541



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

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


Ветеран


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

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


Цитата Cranz86:
помогите с проблемой, делаю новую страницу »
Вам нужно использовать функцию CreateInputOptionPage
Пример
Цитата из Справки:
Описание:
Создание страницы мастера, содержащей флажки (check box) и переключатели (radio button).

Если Exclusive=True, вместо флажков будут отображены переключатели, и в этом случае может быть выбран только один пункт из списка. Если ListBox=True, флажки или переключатели будут помещены в прокручиваемый список.

Замечания:
Для создания на странице флажков/переключателей используется метод Add. Для добавления/считывания состояния флажка/переключателя используется свойство Values. Страницы, для которых Exclusive=True, можно добавить/считать состояние выбранного пункта в SelectedValueIndex.

Например:

var
Page: TInputOptionWizardPage;
IsRegisteredUser: Boolean;
...
// Создание страницы
Page := CreateInputOptionPage(wpWelcome,
'Лицензионное соглашение', 'Вы зарегистрированный пользователь?',
'Если вы зарегистрированы, поставьте флажок ниже и нажмите Далее.',False, False);

// Добавление значений
Page.Add('Я зарегистрированный пользователь');

// Задание первоначальных значений (не обязательно)
Page.Values[0] := False;
...
// Передача значений переменным
IsRegisteredUser := Page.Values[0];

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

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

Отправлено: 17:56, 27-11-2009 | #542


Аватара для A1EXXX

Старожил


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

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


Serega, не знаете, как цвет прогресс-бара поменять? Хотелось бы где-то такой...

Отправлено: 20:18, 27-11-2009 | #543


Ветеран


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

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


Цитата A1EXXX:
как цвет прогресс-бара поменять? »
Посмотрите здесь в сообщении SotM сделал скриншот, а через три сообщения сам скрипт.

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

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

Отправлено: 23:17, 27-11-2009 | #544


Аватара для A1EXXX

Старожил


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

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


Serega, спасибо. Не знаете, как здесь (и на следующих страницах) сделать прозрачность? Пробовал что-то вымутить из вашего скрипта, но ничего не получилось
читать дальше »
Код: Выделить весь код
[Setup]
AppName=Status Panel 
AppVerName=Status Panel 
DefaultDirName={pf}\Test 
DefaultGroupName=Status Panel 
WizardImageFile=compiler:WizModernImage.bmp
OutputDir=.
OutputBaseFilename=status_panel 
DisableReadyPage=True 

[Languages]
Name: "Russian"; MessagesFile: "compiler:Languages\Russian.isl"
 
[Files] 
; Test 
Source: "{sys}\*.dll"; DestDir: "{app}"; Flags: ignoreversion external deleteafterinstall; 
 
[Icons] 
Name: "{group}\Удалить StatusPanel"; Filename: "{uninstallexe}"; 
 
[Code] 
function GetSystemMetrics(nIndex:Integer):Integer; 
 external 'GetSystemMetrics@user32.dll stdcall'; 
  
var 
  Welcome, Edit1, Edit2, Ready1, Ready2, 
  Setup1, Setup2, Finish1, Finish2: TLabel; 
 
procedure InitializeWizard(); 
begin 
  WizardForm.Font.Color:= clWhite;
  WizardForm.ClientWidth := ScaleX(680); 
  WizardForm.ClientHeight := ScaleY(480); 
  WizardForm.Bevel.Hide; 
  WizardForm.Bevel1.Hide; 
  WizardForm.MainPanel.Hide; 
 
  WizardForm.WizardBitmapImage.Left := ScaleX(0); 
  WizardForm.WizardBitmapImage.Top := ScaleY(0); 
  WizardForm.WizardBitmapImage.Width := WizardForm.Width; 
  WizardForm.WizardBitmapImage.Height := WizardForm.Height; 
  WizardForm.WizardBitmapImage.Parent := WizardForm; 
  WizardForm.WizardBitmapImage2.Hide; 
 
  Welcome := TLabel.Create(WizardForm); 
  Welcome.Top := ScaleY(45); 
  Welcome.Caption := 'Приветствие'; 
  Welcome.Transparent := True; 
  Welcome.Parent := WizardForm; 
 
  Edit1 := TLabel.Create(WizardForm); 
  Edit1.Left := WizardForm.ClientWidth / 5; 
  Edit1.Top := ScaleY(45); 
  Edit1.Width := WizardForm.ClientWidth / 5; 
  Edit1.AutoSize := False; 
  Edit1.Caption := '|'; 
  Edit1.Transparent := True; 
  Edit1.Parent := WizardForm; 
 
  Edit2 := TLabel.Create(WizardForm); 
  Edit2.Top := ScaleY(45); 
  Edit2.Caption:= 'Параметры'; 
  Edit2.Transparent := True; 
  Edit2.Parent := WizardForm; 
   
  Ready1 := TLabel.Create(WizardForm); 
  Ready1.Left := Edit1.Left + Edit1.Width; 
  Ready1.Top := ScaleY(45); 
  Ready1.Width := WizardForm.ClientWidth / 5; 
  Ready1.AutoSize := False; 
  Ready1.Caption := '|'; 
  Ready1.Transparent := True; 
  Ready1.Parent := WizardForm; 
 
  Ready2 := TLabel.Create(WizardForm); 
  Ready2.Top := ScaleY(45); 
  Ready2.Caption := 'Меню "Пуск"'; 
  Ready2.Transparent := True; 
  Ready2.Parent := WizardForm; 
   
  Setup1 := TLabel.Create(WizardForm); 
  Setup1.Left := Ready1.Left + Ready1.Width; 
  Setup1.Top := ScaleY(45); 
  Setup1.Width := WizardForm.ClientWidth / 5; 
  Setup1.AutoSize := False; 
  Setup1.Caption := '|'; 
  Setup1.Transparent := True; 
  Setup1.Parent := WizardForm; 
 
  Setup2 := TLabel.Create(WizardForm); 
  Setup2.Top := ScaleY(45); 
  Setup2.Caption := 'Установка'; 
  Setup2.Transparent := True; 
  Setup2.Parent := WizardForm; 
   
  Finish1 := TLabel.Create(WizardForm); 
  Finish1.Left := Setup1.Left + Setup1.Width; 
  Finish1.Top := ScaleY(45); 
  Finish1.Width := WizardForm.ClientWidth / 5; 
  Finish1.AutoSize := False; 
  Finish1.Caption := '|'; 
  Finish1.Transparent := True; 
  Finish1.Parent := WizardForm; 
 
  Finish2 := TLabel.Create(WizardForm); 
  Finish2.Top := ScaleY(45); 
  Finish2.Caption := 'Готово'; 
  Finish2.Transparent := True; 
  Finish2.Parent := WizardForm; 
   
  WizardForm.BackButton.Top := WizardForm.BackButton.Top + ScaleY(110); 
  WizardForm.NextButton.Top := WizardForm.NextButton.Top + ScaleY(110); 
  WizardForm.CancelButton.Top := WizardForm.CancelButton.Top + ScaleY(110); 
 
  WizardForm.OuterNotebook.Left := WizardForm.Width / 2 - WizardForm.OuterNotebook.Width / 2; 
  WizardForm.OuterNotebook.Top := ScaleY(105); 
  WizardForm.InnerNotebook.Top := ScaleY(10); 
   
  WizardForm.Left := GetSystemMetrics(0) / 2 - WizardForm.Width / 2; 
  WizardForm.Top := GetSystemMetrics(1) / 2 - WizardForm.Height / 2; 
end; 
 
procedure CurPageChanged(CurPageID: Integer); 
begin 
  Welcome.Font.Color := clSilver; 
  Edit1.Font.Color := clSilver; 
  Edit2.Font.Color := clSilver; 
  Ready1.Font.Color := clSilver; 
  Ready2.Font.Color := clSilver; 
  Setup1.Font.Color := clSilver; 
  Setup2.Font.Color := clSilver; 
  Finish1.Font.Color := clSilver; 
  Finish2.Font.Color := clSilver; 
 
  Welcome.Left := WizardForm.ClientWidth / 5 / 2 - Welcome.Width / 2; 
  Edit2.Left := Edit1.Left + Edit1.Width / 2 - Edit2.Width / 2; 
  Ready2.Left := Ready1.Left + Ready1.Width / 2 - Ready2.Width / 2; 
  Setup2.Left := Setup1.Left + Setup1.Width / 2 - Setup2.Width / 2; 
  Finish2.Left := Finish1.Left + Finish1.Width / 2 - Finish2.Width / 2; 
   
  if CurPageID = wpWelcome then 
  begin 
    Welcome.Font.Color := clWhite; 
    Edit1.Font.Color := clWhite; 
  end; 
 
  if CurPageID = wpSelectDir then 
  begin 
    Edit1.Font.Color := clWhite; 
    Edit2.Font.Color := clWhite; 
    Ready1.Font.Color := clWhite; 
  end; 
   
  if CurPageID = wpSelectProgramGroup then 
  begin 
    Ready1.Font.Color := clWhite; 
    Ready2.Font.Color := clWhite; 
    Setup1.Font.Color := clWhite; 
    WizardForm.NextButton.Caption := 'Установить'; 
  end; 
   
  if CurPageID = wpInstalling then 
  begin 
    Setup1.Font.Color := clWhite; 
    Setup2.Font.Color := clWhite; 
    Finish1.Font.Color := clWhite; 
  end; 
 
  if CurPageID = wpFinished then 
  begin 
    Finish1.Font.Color := clWhite; 
    Finish2.Font.Color := clWhite; 
  end; 
end;

Последний раз редактировалось A1EXXX, 29-11-2009 в 19:34.


Отправлено: 23:37, 27-11-2009 | #545


Ветеран


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

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


Цитата A1EXXX:
как здесь (и на следующих страницах) сделать прозрачность? »
Придётся создавать панель, и на неё накладывать все контролы, присмотритесь внимательней к процедуре CurPageChanged в моём скрипте, там сначала создаётся панель.

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


Отправлено: 00:21, 28-11-2009 | #546


Аватара для A1EXXX

Старожил


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

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


Serega, ого... Спасибо за наводку....

Отправлено: 00:35, 28-11-2009 | #547


Аватара для CrOsP

Старожил


Автор проектов


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

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


Подскажите ребята как добавил данный тут скрипт чтобы повесить картинку на ссылку дак теперь очень долго инстал запускается вот видео Скачать

-------
Нажмите на "Полезное сообщение" если хотите выразить мне благодарность.
Жми на"Полезное сообщение",а не на меня ))


Отправлено: 10:54, 28-11-2009 | #548


Аватара для A1EXXX

Старожил


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

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


CrOsP, все мелкие файлы (картинки, dll'ки и т.д.) записывай в начало секции [Files], а папки с файлами с самый конец! Пример:
Код: Выделить весь код
[Files]
Source: C:\1.bmp; DestDir: {tmp}; Flags: dontcopy
Source: C:\1.mp3; DestDir: {tmp}; Flags: dontcopy
Source: C:\Program Files\Inno Setup 5\InnoCallback.dll; Flags: dontcopy noencryption solidbreak;;
Source: C:\2.bmp; DestDir: {tmp}; Flags: dontcopy
Source: "D:\Games\Call Of Duty 4\iw3sp.exe"; DestDir: "{app}"; Flags: ignoreversion
Source: "D:\Games\Call Of Duty 4\*"; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs
Это сообщение посчитали полезным следующие участники:

Отправлено: 12:16, 28-11-2009 | #549


Аватара для A1EXXX

Старожил


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

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


Serega, создавать панель я не умею, но на примере, в принципе, понял... Вот только я не знаю, как нанести контролы из моего скрипта на ваш... Пробовал просто соединить, получилось с прозрачностью, но без рюшек, создаваемых через Welcome, Edit1 и т.д. (другого не ожидал, но попробовать стоило ) В общем, без напутствий (или подсказки, примерчика) мне снова никак
А пока буду ещё пробовать что-нибудь написать...


Inno Setup Compiler v5.3.6 build 091128 (English) by Restools

Последний раз редактировалось A1EXXX, 28-11-2009 в 19:02.

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

Отправлено: 17:03, 28-11-2009 | #550



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

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

Похожие темы
Название темы Автор Информация о форуме Ответов Последнее сообщение
Скрипты Inno Setup. Помощь и советы [часть 3] Serega Автоматическая установка приложений 3755 26-10-2011 17:58
[архив] Inno Setup .:[все вопросы]:. Mchik Автоматическая установка приложений 1329 23-08-2009 20:13
[архив - Часть 2] AutoIt скрипты Vadikan AutoIt 985 21-01-2008 09:58
Скрипты Inno Setup Compiler QAZAK Автоматическая установка приложений 7 15-01-2007 17:59
[Архив - Часть 1.1] AutoIt скрипты EgOrus AutoIt 335 04-02-2006 16:58




 
Переход