Имя пользователя:
Пароль:
 | Правила  

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

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

Аватара для El Sanchez

Ветеран


Contributor


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


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

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


Изменения
Автор: El Sanchez
Дата: 16-02-2015
Внимание! Данная тема предназначена только для обсуждения написания скриптов !
Остальные вопросы, а также последние версии компилятора в теме
Inno Setup. Прочие вопросы.


Показать/скрыть: Справка, руководство, примеры:

Показать/скрыть: Ссылки на примеры скриптов:

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

  • Inno Script Generator - генератор скриптов Inno Setup. Обладает некоторыми полезными функциями, которых нет ни у самого Inno Setup, ни у ISTool.
    Последняя версия: 1.0.3.1 [23.03.2008] - Скачать | зеркало на русифицированную программу;
    Примечание: Родной сайт www.hisoft2000.de более недоступен, поэтому здесь расположены сторонние ссылки.

  • Inno Setup Form Designer - редактор страниц Inno Setup, можно создавать свои страницы.
    Последняя версия: 2.0.8 [12.11.2006] - Скачать;
    Примечание: Родной сайт http://isfd.kaju74.de/index.php?isfd более недоступен, поэтому здесь расположены сторонние ссылки.

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

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

  • ISSJoiner - Программа для объединения нескольких скриптов InnoSetup в один.
    Последняя версия: 3.0 [23.07.2009]

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

  • RegExporter - Фриварная утилита для экспорта реестра и конвертации файлов *.reg и *.ini в инсталляционные скрипты Inno Setup и NSIS.
    Последняя версия: 1.2.0 [23.09.2014] - Скачать;



Предыдущие ветки обсуждения по ссылкам ниже и в прикреплённых архивах:

Скрипты Inno Setup. Помощь и советы [часть 6]

Отправлено: 11:48, 10-03-2014

 

Аватара для Dodakaedr

Ветеран


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

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


Nordek, а копировать и перемещать как?

-------
Inno Setup 5 Ultra Unicode


Отправлено: 22:23, 20-10-2014 | #1861



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

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


SHVtYW4=


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

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


Dodakaedr,
Код: Выделить весь код
[Code]
procedure InitializeWizard();
var
  ResultCode: Integer;
begin
  Exec('cmd.exe', ExpandConstant('/C XCOPY {sd}\2 {sd}\1 /E /I'), ExpandConstant('{sys}'), SW_HIDE, ewWaitUntilIdle, ResultCode);
end;
Код: Выделить весь код
[Code]
procedure InitializeWizard();
var
  ResultCode: Integer;
begin
  Exec('cmd.exe', ExpandConstant('/C MD {sd}\1 &&  MOVE {sd}\2 {sd}\1'), ExpandConstant('{sys}'), SW_HIDE, ewWaitUntilIdle, ResultCode);
end;
Dodakaedr, Win + R »
Код: Выделить весь код
cmd /k help

Последний раз редактировалось Nordek, 21-10-2014 в 00:15.

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

Отправлено: 23:52, 20-10-2014 | #1862


Аватара для kotyarko@fb

Старожил


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

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


Вложения
Тип файла: rar SHFileOperation.rar
(1.9 Kb, 19 просмотров)

Цитата Dodakaedr:
Например? »
Можно использовать SHFileOperation.

Отправлено: 00:13, 21-10-2014 | #1863


Аватара для Dodakaedr

Ветеран


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

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


kotyarko@fb, делал как в примере описано не работает. У меня unicode версия.

-------
Inno Setup 5 Ultra Unicode


Отправлено: 17:07, 21-10-2014 | #1864


Ветеран


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

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


Назрел вопрос: как в инно удалить из памяти массив строк, типа Ars: array of String? В дельфи можно отправить в Finalize(), а здесь как? Просто привести к "0"?

Отправлено: 19:58, 21-10-2014 | #1865


Аватара для Dodakaedr

Ветеран


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

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


Nordek, А если в пути есть пробел, то как быть? Так не копирует.
Код: Выделить весь код
[Code]
procedure InitializeWizard();
var
  RCode: Integer;
begin
  Exec('cmd.exe', ExpandConstant('/C XCOPY ""{commonappdata}\Astra\DR Updater"" ""{src}\Data\DR Updater"" /E /I'), ExpandConstant('{sys}'), SW_HIDE, ewWaitUntilIdle, RCode);
end;

-------
Inno Setup 5 Ultra Unicode


Отправлено: 21:07, 21-10-2014 | #1866


Аватара для ROMKA-1977

Пользователь


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

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


Подскажите как выполнить кнопкой переход на нужную страницу? В моём случае необходимо выполнить переход кастомной кнопкой с ReadyPage на страницу SelectDirPage, не кликая несколько раз кнопку "Назад".

Последний раз редактировалось ROMKA-1977, 23-10-2014 в 13:04.


Отправлено: 22:00, 21-10-2014 | #1867


Аватара для Dodakaedr

Ветеран


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

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


Как провести проверку на наличие атрибута "Только чтение" у файла hosts и если оно присутствует то убрать, внести изменения и снова поставить атрибут "Только чтение", а если отсутствует атрибут, то просто внести изменения?

-------
Inno Setup 5 Ultra Unicode


Отправлено: 21:44, 22-10-2014 | #1868


Пользователь


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

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


Dodakaedr,
http://forum.ru-board.com/topic.cgi?...90&limit=1&m=1
далее сам.
Цитата Dodakaedr:
У меня unicode версия. »
для Unicode
Код: Выделить весь код
#ifdef UNICODE
  #define A "W"
#else
  #define A "A"
#endif

function GetFileAttributes(lpFileName: string): integer;  
external 'GetFileAttributes{#A}@kernel32.dll stdcall';  
 
function SetFileAttributes(lpFileName: string; dwFileAttributes: integer): integer;  
external 'SetFileAttributes{#A}@kernel32.dll stdcall';
Это сообщение посчитали полезным следующие участники:

Отправлено: 21:52, 22-10-2014 | #1869


Аватара для Dodakaedr

Ветеран


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

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


Вот собрал, все выполняется кроме последнего, атрибут не становится обратно. Хэлп.
читать дальше »
Код: Выделить весь код
#ifdef UNICODE
  #define A "W"
#else
  #define A "A"
#endif

[Setup]
AppName=My Program
AppVersion=1.5
DefaultDirName={pf}\My Program
OutputDir=.

[Code]
function GetFileAttributes(lpFileName: string): integer;
external 'GetFileAttributes{#A}@kernel32.dll stdcall';

function SetFileAttributes(lpFileName: string; dwFileAttributes: integer): integer;
external 'SetFileAttributes{#A}@kernel32.dll stdcall';

procedure SetAttr();
var
FileName:string;
begin
FileName:= ExpandConstant('{sys}\drivers\etc\hosts');
if (GetFileAttributes(FileName) and FILE_ATTRIBUTE_NORMAL) = FILE_ATTRIBUTE_NORMAL then
SetFileAttributes(FileName, FILE_ATTRIBUTE_READONLY);
end;

procedure CurStepChanged(CurStep: TSetupStep);
var
   HostFile: TStringList;
   FileName: string;
begin
FileName:= ExpandConstant('{sys}\drivers\etc\hosts');
if (GetFileAttributes(FileName) and FILE_ATTRIBUTE_READONLY) = FILE_ATTRIBUTE_READONLY then
SetFileAttributes(FileName, FILE_ATTRIBUTE_NORMAL);
   HostFile := TStringList.Create;
   try
     with HostFile do
     if CurStep = ssPostInstall then
     begin
       LoadFromFile(ExpandConstant('{sys}\drivers\etc\hosts'));
       Add('127.0.0.1    tratata.ru');
       SaveToFile(ExpandConstant('{sys}\drivers\etc\hosts'));
     end;
   finally
     HostFile.free;
   end;
  SetAttr;
end;

-------
Inno Setup 5 Ultra Unicode


Отправлено: 23:13, 22-10-2014 | #1870



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

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

Похожие темы
Название темы Автор Информация о форуме Ответов Последнее сообщение
Скрипты Inno Setup. Помощь и советы [часть 6] El Sanchez Автоматическая установка приложений 2494 10-03-2014 11:51
Скрипты Inno Setup. Помощь и советы [часть 5] El Sanchez Автоматическая установка приложений 1999 28-03-2013 19:09
Скрипты Inno Setup. Помощь и советы [часть 4] El Sanchez Автоматическая установка приложений 2099 22-05-2012 23:16
Скрипты Inno Setup. Помощь и советы [часть 3] Serega Автоматическая установка приложений 3755 26-10-2011 17:58
[архив] Скрипты Inno Setup. Помощь и советы [часть 2] Serega Автоматическая установка приложений 2651 08-11-2010 18:34




 
Переход