Показать полную графическую версию : Скрипты Inno Setup. Помощь и советы [часть 9]
Vanadiy777, в Inno Setup может и нет. Но у репакеров такое есть. Не выделяется текст.
Если там конечно ссылка какая на сайт, чтобы кликнуть, то лучше чтобы кликабельность была. А если нет, достаточно для чтения прокутки одной и чтобы этот "слеш", как его там, не моргал перед передней буквой.
ZVSRus, вот ещё что хотелось бы. Забыл попросить про выбор папки установки как у NSIS.
И вот кнопку с информацией о программе.
Ну последний раз протестируйте. И на этом хватит.
(https://www.upload.ee/files/14868816/AIDA64_6.85.6323_RePack____Portable__by_XXXXXX.rar.html)
ZVSRus, сказать Спасибо, ничего не сказать. В общем, всё как надо.
Есть ещё кое что подправить:
Я запустил батник с тихой установкой, а там окно всплыло Установка завершена. Получается не тихая установка.
Vanadiy777
25-01-2023, 20:27
ZVSRus,
для меня вообще идеальный вариант.
Огромная просьба - пожалуйста, скиньте в личку весь скрипт.
Заранее - Огромное СПАСИБО!!!
то есть ещё несколько чисто косметических просьб. »
DA-Bro,
уж косметику-то сами допилите... Или Вам прямо "под ключ" надо? :)
Vanadiy777, да я просто скрипт не видел. С виду всё и так отлично! Только вот с тихими ключами окно всплывает о завершении установки.
Да по мелочи туда сюда подвинуть переставить, кое что убавить я уж думаю сам смогу.
Так, сказал на всякий случай. Может Вас попрошу, если не получится)
Vanadiy777
25-01-2023, 22:25
Только вот с тихими ключами окно всплывает о завершении установки. »
DA-Bro,
когда скрип будет, то в код, перед окном сообщения, можно будет добавить "if not WizardSilent then"...
Тогда, при тихой установке, окно появляться не будет.
Может Вас попрошу, если не получится) »
Все у Вас получится... Вы уже больше меня знаете... :)
Я запустил батник с тихой установкой, а там окно всплыло Установка завершена. Получается не тихая установка.
А вы обратили внимание на то что находится на финишной форме, помимо информации что программа установлена есть функция на запуск каждой редакции, и чекбокс на открытие интернет страницы, и if not WizardSilent then здесь бессилен.
Вы такое окно захотели. Вывод: или ключи тихой установки в топку, или финишное окно без всяких наворотов, информация и кнопка OK.
А вот эта штука продолжает моргать перед первой буквой:
Что-бы слеш не мигал я ни у кого не видел. В TRichEditViewer всё обшарил, как отключить не нашёл. Если вы видели у кого то
(догадываюсь у кого) запустите его установщик, кликнете лкм на экране (не на установщике) а потом кликнете на значок установщика в панели задач, и вы увидете что и у него мигает.
В пути установки сейчас показывает при длинном пути вначале букву диска:
А по нормальному должно показывать конечную папку:
Это вы так хотите, или же так должно быть. Если DirEdit не светится синим цветом, то InnoSetup именно так и хотит.
А длинный путь укоротите перемещением готового установщика, ну скажем в корень диска D:, или в скрипте константу {src} замените
на {sd} или {userdesktop} и будет короткий путь, но тут как говориться, о вкусах не спорят.
когда скрип будет, то в код, перед окном сообщения, можно будет добавить "if not WizardSilent then"...
Тогда, при тихой установке, окно появляться не будет.
Нужно не перед окном сообщения добавлять "if not WizardSilent then"..., а в procedure CurStepChanged(CurStep: TSetupStep);
на этапе ssDone
Vanadiy777
26-01-2023, 10:27
Нужно не перед окном сообщения добавлять "if not WizardSilent then"..., а в procedure CurStepChanged(CurStep: TSetupStep);
на этапе ssDone »
Я это и имел ввиду, просто не стал расписывать очевидные вещи... :wink:
ZVSRus, Здравствуйте! Получается из-за редакций нельзя по тихому поставить с окном завершения. Тогда уж тихую установку оставьте.
Vanadiy777
26-01-2023, 11:11
ZVSRus,
Не могли бы Вы мне дать скрипт именно в таком виде как сейчас?
Спасибо заранее!
помимо информации что программа установлена есть функция на запуск каждой редакции » Я предполжил, что при выборе любой редакции будет ставиться в папку "AIDA64" без всяких приставок редакций.
Vanadiy777
26-01-2023, 14:25
Я предполжил, что при выборе любой редакции будет ставиться в папку "AIDA64" без всяких приставок редакций. »
DA-Bro,
а с чего, вдруг, у Вас возникло такое предположение?
В оригинальных установщиках тоже в названии папки редакция прописывается.
Вполне вероятно, что сделано это для того, чтобы было можно поставить несколько редакций одновременно.
Vanadiy777, да я как-то и не думал, чтобы в обычной установке саму папку с выбранной редакцией называть. Если только при распаковке.
В оригинале, один установщик - одна редакция, а тут все в одном.
Да и не предполагал сразу несколько редакций ставить.
Setup Final
(https://www.upload.ee/files/14871573/AIDA64_6.85.6323.rar.html)
Господа, я конечно извиняюсь, ничего личного, вы для чего в данной теме находитесь?. Что-бы кто-то чем-то помог, или ласкать друг друга в виде лайков за посты не о чём.
Вы своим флудом всю тему засрали!. Многие тему по InnoSetup на данном форуме стали стороной обходить. Страница 97 4 поста не о чём, но свои лайки крендель получил.
Администратор от вас уже начал кнопку прятать.
PS: Если в моих постах информация для вас не несёт ничего позновательного, ставить лайк мне не нужно, меня даже и это раздражает!
Только вот закрался маленький нюансик. Там вроде путь прописан, а не название и версия.
Путь там, это константа {src} это значит что портативная версия распакуется рядом с установщиком в папку какую выделили.
ZVSRus, а как там надпись на название и версию поправить. А то надпись сверху в "Установка - AIDA64 ХХХХ Business, и в "Распаковка - AIDA64 ХХХХ Business" также думаю должна.
В процедуре
procedure CurPageChanged(CurPageID: Integer);
найди wpSelectDir:
далее в
if Portable.Checked and Extreme.Checked then
if Portable.Checked and Business.Checked then
if Portable.Checked and Engineer.Checked then
if Portable.Checked and NetworkAudit.Checked then
найди строки
WizardForm.SelectDirLabel.Caption:= FmtMessage(ExpandConstant('Программа распакует {#MyAppNamePortable_4} в следующую папку.'), [ExpandConstant('{#SetupSetting("AppName")}')]);
WizardForm.Caption:= FmtMessage(ExpandConstant('Распаковка — {#MyAppNamePortable_4}'), [ExpandConstant('{#SetupSetting("AppName")}')]);
названия {#MyAppNamePortable_4} исправь на {#MyAppName_4}, в общем сотри слово {#MyAppNamePortable_4} везде, индекс 1, 2, 3, 4 не трогай.
DA-Bro,
Для одной программы так пойдёт?.
(https://www.upload.ee/files/14874190/AIDA64.Extreme_6.85.6323.exe.html)
© OSzone.net 2001-2012
vBulletin v3.6.4, Copyright ©2000-2025, Jelsoft Enterprises Ltd.