|
Компьютерный форум OSzone.net » Автоматическая установка Windows » Автоматическая установка приложений » Скрипты Inno Setup. Помощь и советы [часть 9] |
|
Скрипты Inno Setup. Помощь и советы [часть 9]
|
Ветеран Сообщения: 1269 |
Профиль | Отправить PM | Цитировать
Внимание! Данная тема предназначена только для обсуждения написания скриптов!
Остальные вопросы, а также последние версии компилятора в теме 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 |
Новый участник Сообщения: 10
|
Профиль | Отправить PM | Цитировать Цитата 1Виталий1:
Тоисть: Скрытый текст
procedure InitializeWizard(); begin ExtractTemporaryFile('bass.dll'); ExtractTemporaryFile('CallbackCtrl.dll'); ExtractTemporaryFile('botva2.dll'); ExtractTemporaryFile('volmax.png'); ExtractTemporaryFile('volmin.png'); ExtractTemporaryFile('voldote.png') ExtractTemporaryFile('volpb.png') ExtractTemporaryFile('MusicButton.png'); ExtractTemporaryFile('music.mp3'); BASS_Init('{tmp}\music.mp3') BASS_CreateMediaPlayer(WizardForm, '{tmp}\volmax.png', '{tmp}\volmin.png', '{tmp}\volpb.png', '{tmp}\voldote.png', 70, 325) begin RedesignWizardForm; end end; procedure DeinitializeSetup(); begin Bass_DeInit; gdipShutdown end; |
|
Отправлено: 22:53, 18-06-2020 | #641 |
Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети. Если же вы забыли свой пароль на форуме, то воспользуйтесь данной ссылкой для восстановления пароля. |
Старожил Сообщения: 291
|
Профиль | Отправить PM | Цитировать procedure InitializeWizard(); begin RedesignWizardForm; ExtractTemporaryFile('bass.dll'); ExtractTemporaryFile('CallbackCtrl.dll'); ExtractTemporaryFile('botva2.dll'); ExtractTemporaryFile('volmax.png'); ExtractTemporaryFile('volmin.png'); ExtractTemporaryFile('voldote.png') ExtractTemporaryFile('volpb.png') ExtractTemporaryFile('MusicButton.png'); ExtractTemporaryFile('music.mp3'); BASS_Init('{tmp}\music.mp3') BASS_CreateMediaPlayer(WizardForm, '{tmp}\volmax.png', '{tmp}\volmin.png', '{tmp}\volpb.png', '{tmp}\voldote.png', 70, 325) end; procedure DeinitializeSetup(); begin Bass_DeInit; gdipShutdown end; |
------- Отправлено: 07:57, 19-06-2020 | #642 |
Новый участник Сообщения: 8
|
Профиль | Отправить PM | Цитировать Здравствуйте, помогите, пожалуйста, делаю игровой инсталлятор и нужно внедрить в него доп. по с Яндекса, могу оплатить работу. Уже голову сломал не чего не выходит, пишите, кто знает, как сделать мне в лс
|
Отправлено: 00:25, 05-07-2020 | #643 |
Пользователь Сообщения: 90
|
Профиль | Отправить PM | Цитировать Ispanets, Что именно хотите сделать? Какое дополнительное ПО? Браузер от Яндекса? Поиск от Яндекса? Или какую-нибудь другую хрень от Яндекса? ПО в самом инсталляторе или нужно скачать и потом установить?
|
Отправлено: 13:08, 05-07-2020 | #644 |
Новый участник Сообщения: 8
|
Профиль | Отправить PM | Цитировать в лс скинул
|
Отправлено: 13:54, 05-07-2020 | #645 |
Новый участник Сообщения: 8
|
Профиль | Отправить PM | Цитировать Да мне нужно доп по поставить в инсталятор, не могу найти специалиста по Inno Setup
|
Отправлено: 08:08, 06-07-2020 | #646 |
Ветеран Сообщения: 861
|
Профиль | Отправить PM | Цитировать Доброе время суток. Нужна помощь. Нужно получить версию программы из реестра, сравнить версию указанную в скрипте и выдать msgbox старая версия или свежая.
|
------- Последний раз редактировалось habib2302, 13-07-2020 в 10:06. Отправлено: 20:58, 09-07-2020 | #647 |
Новый участник Сообщения: 2
|
Профиль | Отправить PM | Цитировать Как сделать ассоциацию файлов установить драйвер UltraISO ?
|
Последний раз редактировалось Udwratu2, 04-08-2020 в 19:24. Отправлено: 17:03, 04-08-2020 | #648 |
Новый участник Сообщения: 2
|
Профиль | Отправить PM | Цитировать Root: HKCR; Subkey: ".iso"; ValueData: "{#AppName}"; Flags: uninsdeletevalue; ValueType: string; ValueName: ""
Root: HKCR; Subkey: "{#AppName}"; ValueData: "Program {#AppName}"; Flags: uninsdeletekey; ValueType: string; ValueName: "" Root: HKCR; Subkey: "{#AppName}\DefaultIcon"; ValueData: "{app}\{#AppExeName},0"; ValueType: string; ValueName: "" Root: HKCR; Subkey: "{#AppName}\shell\open\command"; ValueData: """{app}\{#AppExeName}"" ""%1"""; ValueType: string; ValueName: "" Так ли? Что с драйвером делать и как добавить пункты в контекстное меню? |
Последний раз редактировалось Udwratu2, 04-08-2020 в 19:40. Отправлено: 19:26, 04-08-2020 | #649 |
Новый участник Сообщения: 42
|
Профиль | Отправить PM | Цитировать Парни добавление Брандмауэр
А, если надо добавить 2 программы то как сделать? [code][Setup] #define AppName "My Program" #define AppExeName "MyProg.exe" procedure CurStepChanged(CurStep: TSetupStep); var RC: Integer; SIn, SOut: String; begin if CurStep=ssInstall then begin Exec(ExpandConstant('netsh.exe'), 'advfirewall firewall delete rule name="{#AppName}"','', SW_HIDE, ewWaitUntilTerminated, RC) SIn:='advfirewall firewall add rule name="{#AppName}" dir=in action=block program='+ExpandConstant('"{app}\{#AppExeName}"')+' enable=yes'; Exec('netsh', SIn,'', SW_HIDE, ewWaitUntilTerminated, RC) SOut:='advfirewall firewall add rule name="{#AppName}" dir=out action=block program='+ExpandConstant('"{app}\{#AppExeName}"')+' enable=yes'; Exec('netsh', SOut,'', SW_HIDE, ewWaitUntilTerminated, RC) end end; procedure CurUninstallStepChanged(CurUninstallStep: TUninstallStep); var RC: Integer; begin if CurUninstallStep=usUninstall then begin Exec(ExpandConstant('netsh.exe'), 'advfirewall firewall delete rule name="{#AppName}"','', SW_HIDE, ewWaitUntilTerminated, RC) end end; |
Отправлено: 07:05, 11-08-2020 | #650 |
Участник сейчас на форуме | Участник вне форума | Автор темы | Сообщение прикреплено |
| |||||
Название темы | Автор | Информация о форуме | Ответов | Последнее сообщение | |
Скрипты 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 |
|