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

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


Ivan_009, супер

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


Отправлено: 19:48, 03-04-2014 | #251



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

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


Аватара для Stealthmax

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


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

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


Цитата Dodakaedr:
Спс. Действительно сработало. Как теперь еще кнопку свернуть вывести? »
А вот здесь ты не одинок). Таких желающих много. Вариантов 2, я использую скин, поэтому особо не парюсь, но если скин не устраивает, то милости прошу в гости к Johny777, ну а второй вариант- это скин. Других решений не встречал. Много кто изгалялся над этой проблемой))).

Отправлено: 20:11, 03-04-2014 | #252


Аватара для Dodakaedr

Ветеран


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

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


Цитата Stealthmax:
я использую скин »
Интересно! Можешь показать?

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


Отправлено: 20:17, 03-04-2014 | #253


Аватара для Ivan_009

Ветеран


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

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


Цитата Dodakaedr:
Интересно! Можешь показать »
Dodakaedr, Вот пример: http://rghost.ru/53745223
Это сообщение посчитали полезным следующие участники:

Отправлено: 20:21, 03-04-2014 | #254


Аватара для Dodakaedr

Ветеран


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

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


Ivan_009, попробую к своему инсталу это прикрутить)))

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


Отправлено: 20:25, 03-04-2014 | #255


Аватара для Dodakaedr

Ветеран


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

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


Ivan_009, Stealthmax, жаль что не ко всем скинам это подходит..

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


Отправлено: 20:57, 03-04-2014 | #256


Аватара для audiofeel

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


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

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


Ivan_009,
да, это я знаю, я имел ввиду "свой" курсор - то есть 'cursor.cur'
через = function LoadCursorFromFile(FileName: String): Cardinal; external 'LoadCursorFromFileA@user32 stdcall';
на кнопки делал так = BtnSetCursor(CancelButton,LoadCursorFromFile(ExpandConstant('{tmp}\cursor2.cur')));
а на саму форму как, ????

Отправлено: 21:13, 03-04-2014 | #257


Аватара для Ivan_009

Ветеран


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

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


audiofeel, Короче не мучайся вот пример...

Цитата:
[Setup]
AppName=My Application
AppVersion=1.5
DefaultDirName={pf}\My Application
RawDataResource=MyCursor:cursor.ani

[code]
function LoadCursorFromFile(FileName: String): Cardinal;
external 'LoadCursorFromFileA@user32 stdcall';

const
MyCursor = 101;
RT_RCDATA = 10;

var
hcur: Cardinal;
ResStream: TResourceStream;

procedure InitializeWizard;
begin
with WizardForm do begin
ClientWidth:=ScaleX(650);
ClientHeight:=ScaleY(400);
Position:=poScreenCenter;
OuterNotebook.Hide;
InnerNotebook.Hide;
Bevel.Hide;
Cursor := MyCursor;
end;

ResStream := TResourceStream.Create(HInstance, '_IS_MYCURSOR', RT_RCDATA);
try
ResStream.SaveToFile(ExpandConstant('{tmp}\cursor.ani'));
hcur := LoadCursorFromFile(ExpandConstant('{tmp}\cursor.ani'));
Screen.Cursors[MyCursor] := hcur;
finally
ResStream.Free;
end;

with WizardForm.NextButton do
begin
SetBounds(ScaleX(400), ScaleY(300), ScaleX(81), ScaleY(30));
Cursor := MyCursor;
end;

with WizardForm.BackButton do
begin
SetBounds(ScaleX(300), ScaleY(300), ScaleX(81), ScaleY(30));
Cursor := MyCursor;
end;

with WizardForm.CancelButton do
begin
SetBounds(ScaleX(530), ScaleY(300), ScaleX(81), ScaleY(30));
Cursor := MyCursor;
end;
end;

procedure DeinitializeSetup();
begin
DeleteObject(hcur);
end;

На форму и кнопки...

Рядом кинь сам курсор cursor.ani

Последний раз редактировалось Ivan_009, 03-04-2014 в 22:34.

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

Отправлено: 21:44, 03-04-2014 | #258


Аватара для audiofeel

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


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

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


Ivan_009,
Цитата Ivan_009:
audiofeel, Короче не мучайся вот пример... »


я по другому не много делал - вроде работает = http://rghost.ru/53748629

читать дальше »
#ifdef UNICODE
#define A "W"
#else
#define A "A"
#endif

[Setup]
AppName=My Program
AppVersion=1.5
DefaultDirName={pf}\My Program
DefaultGroupName=My Program
UninstallDisplayIcon={app}\MyProg.exe
SolidCompression=yes
Compression=lzma/ultra
OutputDir=Output

[Files]
Source: cursor.ani; Flags: dontcopy

[code]
function LoadCursorFromFile(FileName: String): Cardinal; external 'LoadCursorFromFile{#A}@user32 stdcall';
function DeleteObject(p1: Longword): BOOL; external 'DeleteObject@gdi32.dll stdcall';

const
MyCursor = 101;

var
hcur: Cardinal;

function InitializeSetup:boolean;
begin
if not FileExists(ExpandConstant('{tmp}\cursor.ani')) then ExtractTemporaryFile('cursor.ani');
Result := True;
end;

procedure InitializeWizard();
begin
with WizardForm do begin
Cursor := MyCursor;
end;
hcur := LoadCursorFromFile(ExpandConstant('{tmp}\cursor.ani'));
Screen.Cursors[MyCursor] := hcur;
end;

procedure DeinitializeSetup();
begin
DeleteObject(hcur);
end;
Это сообщение посчитали полезным следующие участники:

Отправлено: 22:19, 03-04-2014 | #259


Аватара для Ivan_009

Ветеран


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

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


Цитата audiofeel:
я по другому не много делал - вроде работает »
Можно и так...

Только я забыл в конце дописать:

Код: Выделить весь код
procedure DeinitializeSetup();
begin
DeleteObject(hcur);
end;

Последний раз редактировалось Ivan_009, 03-04-2014 в 22:36.


Отправлено: 22:26, 03-04-2014 | #260



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




 
Переход