|
Компьютерный форум OSzone.net » Автоматическая установка Windows » Автоматическая установка приложений » Скрипты Inno Setup. Помощь и советы [часть 9] |
|
Скрипты Inno Setup. Помощь и советы [часть 9]
|
Ветеран Сообщения: 1269 |
Внимание! Данная тема предназначена только для обсуждения написания скриптов!
Остальные вопросы, а также последние версии компилятора в теме Inno Setup. Прочие вопросы. Показать/скрыть: Справка, руководство, примеры:
Показать/скрыть: Ссылки на примеры скриптов:
Показать/скрыть: Дополнительные программы для Inno Setup:
Предыдущие ветки обсуждения по ссылкам ниже и в прикреплённых архивах: Скрипты Inno Setup. Помощь и советы [часть 6] | Скрипты Inno Setup. Помощь и советы [часть 6].7z Скрипты Inno Setup. Помощь и советы [часть 7] | Скрипты Inno Setup. Помощь и советы [часть 7].7z Скрипты Inno Setup. Помощь и советы [часть 8] | Скрипты Inno Setup. Помощь и советы [часть 8].7z |
|
Отправлено: 16:09, 04-04-2018 |
Старожил Сообщения: 291
|
Профиль | Отправить PM | Цитировать |
------- Отправлено: 16:15, 29-03-2020 | #601 |
Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети. Если же вы забыли свой пароль на форуме, то воспользуйтесь данной ссылкой для восстановления пароля. |
Пользователь Сообщения: 62
|
Профиль | Отправить PM | Цитировать ZVSRus, да так, а как ето сделать?
|
Отправлено: 18:03, 29-03-2020 | #602 |
Старожил Сообщения: 291
|
Профиль | Отправить PM | Цитировать Цитата Beavimo:
|
|
------- Отправлено: 14:05, 30-03-2020 | #603 |
Пользователь Сообщения: 62
|
Профиль | Отправить PM | Цитировать ZVSRus, я так и думал, но не пробовал, щас попробую
|
Отправлено: 10:47, 31-03-2020 | #604 |
Новый участник Сообщения: 3
|
Профиль | Отправить PM | Цитировать Здравствуйте!
Мне не нужна помощь. Дело такое, создаю ярлык в папке Автозагрузка Name: "{userstartup}\{#MyAppName}"; Filename: "{app}\{#MyAppExeName}"; WorkingDir: "{app}" Программа запускается в развёрнутом виде, каждый раз её приходится сворачивать в трей. А если в свойствах ярлыка сделать так ![]() Программа призапуске будет сама своррачиваться в трей. Вопрос такой как это сделать в скрипте Name: "{userstartup}\{#MyAppName}"; Filename: "{app}\{#MyAppExeName}"; WorkingDir: "{app}" |
Последний раз редактировалось Alsag, 07-04-2020 в 22:32. Отправлено: 20:36, 07-04-2020 | #605 |
Старожил Сообщения: 352
|
Профиль | Отправить PM | Цитировать |
Отправлено: 21:09, 07-04-2020 | #606 |
Новый участник Сообщения: 3
|
Профиль | Отправить PM | Цитировать Цитата iglezz:
|
|
Отправлено: 21:26, 07-04-2020 | #607 |
Ветеран Сообщения: 839
|
Профиль | Отправить PM | Цитировать |
Отправлено: 16:41, 12-04-2020 | #608 |
Новый участник Сообщения: 10
|
Профиль | Отправить PM | Цитировать Обнаружил проблему. Во время запуска Обновления.
Отображения окна - "Клиент игры не найден! Обновление не может быть установлено!" Нажимаю ОК И идёт продолжение запуска обновления, а должно закрыть окно Обновления. В чем может быть проблема? Код: Скрытый текст
//Процедура, Оформление окон procedure LoadVCLStyle(VClStyleFile: String); external 'LoadVCLStyleW@files:VclStylesInno.dll stdcall'; procedure UnLoadVCLStyles; external 'UnLoadVCLStyles@files:VclStylesInno.dll stdcall'; //Процедура, Splash procedure ShowSplashScreen(p1:HWND;p2:AnsiString;p3,p4,p5,p6,p7:integer;p8:boolean;p9:Cardinal;p10:integer); external 'ShowSplashScreen@files:isgsg.dll stdcall delayload'; //Объеденение две функции в одну, первая, Оформление окон Function InitializeSetup1(): Boolean; begin ExtractTemporaryFile('Amakrits.vsf'); LoadVCLStyle(ExpandConstant('{tmp}\Amakrits.vsf')); Result := True; end; procedure DeinitializeSetup(); begin UnLoadVCLStyles; end; //Объеденение две функции в одну, вторая, Обновление Function InitializeSetup2(): Boolean; var ResultStr: String; begin RegQueryStringValue(HKCU, 'Software\WoTBlitz', 'Version', ResultStr); if ResultStr='{#AppVer}' then begin Result := MsgBox('Поиск клиента игры...' #13#13 'Клиент игры найден. Продолжить установку?', mbConfirmation, MB_YESNO) = idYes; if Result = False then MsgBox('Поиск клиента игры...' #13#13 'Обновление клиента прервано.', mbInformation, MB_OK); end else MsgBox('Поиск клиента игры...' #13 'Клиент игры не найден!' #13#13 'Обновление не может быть установлено!', mbConfirmation, MB_OK) end; //Читаем значение параметра Version из реестра и присваиваем его переменной ResultStr //Если значение параметра Version равно 1.0, обновление устанавливается, если не равно или не существует – установка прекращается //Запуск функций, сначала первую за ней вторую (более правильное объеденение двух функций в одну) Function InitializeSetup(): Boolean; begin InitializeSetup1(); InitializeSetup2(); Result := True; end; //Функция, Splash procedure InitializeWizard(); begin ExtractTemporaryFile('Splash.png'); ShowSplashScreen(WizardForm.Handle,ExpandConstant('{tmp}\Splash.png'),1000,3000,1000,0,255,True,$FFFFFF,10); end; |
Отправлено: 15:22, 17-04-2020 | #609 |
Старожил Сообщения: 352
|
Профиль | Отправить PM | Цитировать Цитата passstrada:
|
|
Отправлено: 15:41, 17-04-2020 | #610 |
![]() |
Участник сейчас на форуме |
![]() |
Участник вне форума |
![]() |
Автор темы |
![]() |
Сообщение прикреплено |
| |||||
Название темы | Автор | Информация о форуме | Ответов | Последнее сообщение | |
Скрипты Inno Setup. Помощь и советы [часть 7] | El Sanchez | Автоматическая установка приложений | 2499 | 02-02-2015 08:59 | |
Скрипты 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 |
|