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

Компьютерный форум 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

 

SHVtYW4=


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

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


Цитата Dodakaedr:
А если в пути есть пробел, то как быть? »
Код: Выделить весь код
[Code]
procedure InitializeWizard();
var
  ResultCode: Integer;
begin
  Exec('cmd.exe', ExpandConstant('/C XCOPY "{commonappdata}\Astra\DR Updater" "{src}\New Folder" /E /I'), ExpandConstant('{sys}'), SW_HIDE, ewWaitUntilIdle, ResultCode);
end;
Это сообщение посчитали полезным следующие участники:

Отправлено: 01:05, 23-10-2014 | #1871



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

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


Ветеран


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

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


Цитата Dodakaedr:
Как провести проверку на наличие атрибута "Только чтение" у файла hosts и если оно присутствует то убрать, внести изменения и снова поставить атрибут "Только чтение", а если отсутствует атрибут, то просто внести изменения? »
Цитата Dodakaedr:
все выполняется кроме последнего, атрибут не становится обратно »
читать дальше »
Код: Выделить весь код
#define A = (Defined UNICODE) ? "W" : "A"


function GetFileAttributes( lpFileName: String ): DWORD; external 'GetFileAttributes{#A}@kernel32.dll stdcall';
function SetFileAttributes( lpFileName: String; dwFileAttributes: DWORD ): BOOL; external 'SetFileAttributes{#A}@kernel32.dll stdcall';


procedure WriteStr( const szFile: String; szArray: array of String );
var
    i: Integer;
    tList: TStringList;
    bAttrib: BOOL;
begin
    if ( GetFileAttributes( szFile ) and FILE_ATTRIBUTE_READONLY ) = FILE_ATTRIBUTE_READONLY then // если у файла есть атрибут только чтение то
      bAttrib := SetFileAttributes( szFile, FILE_ATTRIBUTE_NORMAL); // снимаем атрибут
      
    tList := TStringList.Create; // создаем стринг-лист
    with tList do
    try
        LoadFromFile( szFile ); // загружаем файл
        
        for i := 0 to GetArrayLength( szArray ) - 1 do
          Add( szArray[i] ) // пишем в файл строки из масива szArray
                
        SaveToFile( szFile ); // сохраняем файл
    finally
        
        Free; // разрушаем стринг-лист
    end;
    
    if bAttrib then // Проверяем был ли снят атрибут, и если да то
      SetFileAttributes( szFile, FILE_ATTRIBUTE_READONLY ); // ставим прежний атрибкт
end;


procedure CurStepChanged( CurStep: TSetupStep );
begin
    if CurStep = ssPostInstall then
      WriteStr( ExpandConstant( '{sys}\drivers\etc\hosts' ), ['127.0.0.1 www.com', // список строк, через запятую.
                                                              '127.0.0.1 www.net',
                                                              '127.0.0.1 www.ru'] );
end;

Последний раз редактировалось saurn, 23-10-2014 в 01:40.

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

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


Аватара для Dodakaedr

Ветеран


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

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


saurn, Спасибо вам большое!!! И можно вас попросить сделать проверку на строку...тоесть если строка уже присутствует то ничего не делаем, если же её нету то прописываем... и на удаление такое же. Спасибо!

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


Последний раз редактировалось Dodakaedr, 23-10-2014 в 16:55.


Отправлено: 15:39, 23-10-2014 | #1873


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


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

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


Dodakaedr, в лс.

Отправлено: 21:02, 23-10-2014 | #1874


Аватара для audiofeel

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


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

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


такой вопрос вот назрел, в связи с новой анимацией окон в Windows, как её включить? ( я не про новую, а вообще про анимацию), задействовать на первой ботве (не защищенной) примеров не нашел,
спасибо !!!

Отправлено: 10:09, 24-10-2014 | #1875


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


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

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


Цитата audiofeel:
новой анимацией окон в Windows »
What?
Цитата audiofeel:
я не про новую, а вообще про анимацию »
Цитата audiofeel:
на первой ботве (не защищенной) »
I not understand you.

Отправлено: 21:33, 24-10-2014 | #1876


Аватара для audiofeel

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


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

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


sergey3695,
a question that's long overdue, in connection with the new animation window on Windows, as it include? (I'm not talking about a new, and in general about the animation), use the first tops (not secure) examples not found
thanks !!!
Цитата sergey3695:
What? »
http://www.thevista.ru/page17751-nov..._10_v_deystvii
Цитата sergey3695:
I not understand you. »
http://krinkels.org/threads/dopolnit...-inno-setup.9/
так понятней ?

Отправлено: 22:10, 24-10-2014 | #1877


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


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

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


Цитата audiofeel:
так понятней ? »
При использовании ботвы, не работает анимация окна в Windows 10? Если так то мне негде тестить. Даже без понятия что там.

Отправлено: 00:52, 25-10-2014 | #1878


Аватара для audiofeel

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


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

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


Цитата sergey3695:
При использовании ботвы, не работает анимация окна в Windows 10? Если так то мне негде тестить. Даже без понятия что там. »
ну черт с ней с виндоус 10, все таки при использовании ботвы можно "включить" анимацию или нет ?? пересмотрел немного скриптов, не нашел примеров как ее включить , может ботва и не при чем ?? ну тогда как ее включить?? или она не включается, любая не обязательно "новая" ??
http://youtu.be/5oS0DScnHqc

Последний раз редактировалось audiofeel, 25-10-2014 в 01:27.


Отправлено: 01:14, 25-10-2014 | #1879


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


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

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


audiofeel, может это потому что у тя в скрипте стиль bsNone. Попробуй просто чисто на 10-ке
Код: Выделить весь код
[Setup] 
AppName=My Program 
AppVerName=My Program v.1.2 
DefaultDirName={pf}\My Program 
 
[Code ] 
const 
  GWL_STYLE = (-16); 
  WS_CAPTION = $C00000; 
 
function GetWindowLong(Wnd: HWnd; Index: Integer): Longint; 
external 'GetWindowLongA@user32.dll stdcall'; 
 
function SetWindowLong(Wnd: HWnd; Index: Integer; NewLong: Longint): Longint; 
external 'SetWindowLongA@user32.dll stdcall'; 
 
Procedure InitializeWizard(); 
begin 
//  SetWindowLong(WizardForm.Handle, GWL_STYLE,
//              GetWindowLong(WizardForm.Handle, GWL_STYLE) and not WS_CAPTION);
  WizardForm.BorderStyle:= bsNone;
end;
Первый или второй закомментированный вариант.

Отправлено: 07:32, 25-10-2014 | #1880



Компьютерный форум 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




 
Переход