-
Posts
143 -
Joined
-
Last visited
Posts posted by Nowik1971
-
-
Кстати проверил и действительно на тестовом сервере работает!!! Спасибо! По логу питона посмотрел грузится первым и быстрее.... Жаль что вагоны и танки на картах не создаются....
-
Я имел ввиду при создании пэкаджи..., а так я знаю, что все это делается и в модпаке у меня все стоит и работает, просто решил попробовать, все создается кроме всего того, что ничего не работает в этом патче (0.9.17.0.3) и некоторые папки (spaces) в пакеджи не кидает ....
-
т.е. получается что только сбитые гусеницы и танк убитый изнутри перекрашивается и все?
Автор наверное примет меры и почитает и здесь в теме и поправит... мне так кажется.... Хотя у меня и гусеницы сбитые не показывает, пробую сейчас разные варианты, просто заинтриговало.. может что получится...
-
Как не поддерживает? А в теме написано что поддерживает....https://koreanrandom.com/forum/topic/1578-09x-однотонные-текстуры-танков-траки-полупрозра/?p=13889
-
night_dragon_on, on 04 Feb 2017 - 13:36, said:
Спасибо огромнейшее за помощь спасибо !
monochromatic_texture.wotmod создается, но в 0.9.17.0.3 не работает, и папка spaces отсутствует в архиве, а распаковывается в res_mods\0.9.17.0.3 не знаю где косяк, вроде все сделал как Вы и показали. Но все равно Вам Жирнейший плюс+++
Сейчас попробую не тестовом сервере...
-
бред это какй то...
Это почему же вроде так собираются варгейминг делать.... Вот Юша выложил
-
Кто подскажет какой принцип будет когда все моды в Пэкажи будут моды чем архивировать и вообще что да как?
-
а подскажите где эти настройки что-то такого в настройках игрового клиента не нашел....
А пардон все нашел .... спасибо стоит расширенный у меня
-
да даже переименновываешь или другие пишешь они обратно появляются на 3 из 2 страницы тоесть копируют автоматом и копец что я только не делал
комплист 3 пытался сделать на основе скрипта что выше
Через редактор формы легко сделать хоть сто страниц... попробуйте там все понятно и тогда поймете....
вот пример сде6лал за 15 секунд.... простой
'Пример'
; Скрипт создан через Мастер Inno Setup Script. ; ИСПОЛЬЗУЙТЕ ДОКУМЕНТАЦИЮ ДЛЯ ПОДРОБНОСТЕЙ ИСПОЛЬЗОВАНИЯ INNO SETUP! [Setup] AppName=My Application AppVersion=1.5 DefaultDirName={pf}\My Application [ISFormDesigner] WizardForm=FF0A005457495A415244464F524D003010BF04000054504630F10B5457697A617264466F726D0A57697A617264466F726D0C436C69656E744865696768740368010B436C69656E74576964746803F1010C4578706C696369744C65667402000B4578706C69636974546F7002000D4578706C6963697457696474680301020E4578706C69636974486569676874038F010D506978656C73506572496E636802600A54657874486569676874020D00F10C544E65774E6F7465626F6F6B0D4F757465724E6F7465626F6F6B00F110544E65774E6F7465626F6F6B506167650B57656C636F6D65506167650D4578706C69636974576964746803F1010E4578706C696369744865696768740339010000F110544E65774E6F7465626F6F6B5061676509496E6E6572506167650D4578706C69636974576964746803F1010E4578706C6963697448656967687403390100F10C544E65774E6F7465626F6F6B0D496E6E65724E6F7465626F6F6B00F110544E65774E6F7465626F6F6B506167650B4C6963656E7365506167650D4578706C69636974576964746803A1010E4578706C6963697448656967687403ED000000F110544E65774E6F7465626F6F6B506167650D53656C656374446972506167650D4578706C69636974576964746803A1010E4578706C6963697448656967687403ED000000F110544E65774E6F7465626F6F6B506167651453656C656374436F6D706F6E656E747350616765084E65787450616765070D4953437573746F6D50616765310C4578706C696369744C65667402600D4578706C6963697457696474680341010E4578706C6963697448656967687403ED000000F110544E65774E6F7465626F6F6B506167651653656C65637450726F6772616D47726F7570506167650C50726576696F757350616765070D4953437573746F6D5061676533000010544E65774E6F7465626F6F6B506167650D4953437573746F6D50616765310743617074696F6E06154953437573746F6D50616765315F43617074696F6E0B4465736372697074696F6E06194953437573746F6D50616765315F4465736372697074696F6E0C50726576696F757350616765071453656C656374436F6D706F6E656E747350616765084E65787450616765070D4953437573746F6D50616765320D4578706C69636974576964746802000E4578706C696369744865696768740200000010544E65774E6F7465626F6F6B506167650D4953437573746F6D50616765320743617074696F6E06154953437573746F6D50616765325F43617074696F6E0B4465736372697074696F6E06194953437573746F6D50616765325F4465736372697074696F6E0C50726576696F757350616765070D4953437573746F6D5061676531084E65787450616765070D4953437573746F6D50616765330D4578706C69636974576964746802000E4578706C696369744865696768740200000010544E65774E6F7465626F6F6B506167650D4953437573746F6D50616765330743617074696F6E06154953437573746F6D50616765335F43617074696F6E0B4465736372697074696F6E06194953437573746F6D50616765335F4465736372697074696F6E0C50726576696F757350616765070D4953437573746F6D5061676532084E65787450616765071653656C65637450726F6772616D47726F757050616765000000000000 [Code] { RedesignWizardFormBegin } // Не удалять эту строку! // Не изменять эту секцию. Она создана автоматически. var ISCustomPage1: TWizardPage; ISCustomPage2: TWizardPage; ISCustomPage3: TWizardPage; procedure RedesignWizardForm; begin { Creates custom wizard page } ISCustomPage1 := CreateCustomPage(wpSelectComponents, 'ISCustomPage1_Caption', 'ISCustomPage1_Description'); ISCustomPage2 := CreateCustomPage(ISCustomPage1.ID, 'ISCustomPage2_Caption', 'ISCustomPage2_Description'); ISCustomPage3 := CreateCustomPage(ISCustomPage2.ID, 'ISCustomPage3_Caption', 'ISCustomPage3_Description'); { ReservationBegin } // Вы можете добавить ваш код здесь. { ReservationEnd } end; // Не изменять эту секцию. Она создана автоматически. { RedesignWizardFormEnd } // Не удалять эту строку! procedure InitializeWizard(); begin RedesignWizardForm; end;
- 1
-
Увы не работает .... там в окне Components, а у меня идет после Components ..
Поменяй... Это ведь пример... Список страниц в справке или погугли ... не помню где-то сам искал и находил в сети...
-
когда просил помощи , я имел ввиду что мне нужна помощь !!! а не то что клянчил, и что бы за меня все сделали....
Я уже сам пробовал сделать, но увы у меня не получилось ...
мой код
[Files] Source: "MODS\WOT_TWEAKER\Отключения тумана\*"; DestDir: "{app}\res_mods\{#Patch}"; Flags: ignoreversion recursesubdirs createallsubdirs; Tasks: Tweaker\1; Source: "MODS\WOT_TWEAKER\Отключить облака\*"; DestDir: "{app}\res_mods\{#Patch}"; Flags: ignoreversion recursesubdirs createallsubdirs; Tasks: Tweaker\2; Source: "MODS\WOT_TWEAKER\Отключить тень под танками\*"; DestDir: "{app}\res_mods\{#Patch}"; Flags: ignoreversion recursesubdirs createallsubdirs; Tasks: Tweaker\3; Source: "MODS\WOT_TWEAKER\Отключить эффект движения деревьев\*"; DestDir: "{app}\res_mods\{#Patch}"; Flags: ignoreversion recursesubdirs createallsubdirs; Tasks: Tweaker\4; Source: "MODS\WOT_TWEAKER\Отключить эффекты разрушения объектов\*"; DestDir: "{app}\res_mods\{#Patch}"; Flags: ignoreversion recursesubdirs createallsubdirs; Tasks: Tweaker\5; Source: "MODS\WOT_TWEAKER\Отключить эффект взрыва снарядов и попадания в объекты\*"; DestDir: "{app}\res_mods\{#Patch}"; Flags: ignoreversion recursesubdirs createallsubdirs; Tasks: Tweaker\6; Source: "MODS\WOT_TWEAKER\Отключить эффекты уничтожения танков\*"; DestDir: "{app}\res_mods\{#Patch}"; Flags: ignoreversion recursesubdirs createallsubdirs; Tasks: Tweaker\7; Source: "MODS\WOT_TWEAKER\Отключить эффекты попадания по танкам\*"; DestDir: "{app}\res_mods\{#Patch}"; Flags: ignoreversion recursesubdirs createallsubdirs; Tasks: Tweaker\8; Source: "MODS\WOT_TWEAKER\Отключить эффекты проявления погоды и дым от объектов на картах\*"; DestDir: "{app}\res_mods\{#Patch}"; Flags: ignoreversion recursesubdirs createallsubdirs; Tasks: Tweaker\9; Source: "MODS\WOT_TWEAKER\Отключить дым и пламя от выстрелов\*"; DestDir: "{app}\res_mods\{#Patch}"; Flags: ignoreversion recursesubdirs createallsubdirs; Tasks: Tweaker\10; Source: "MODS\WOT_TWEAKER\Отключить дым от уничтоженных танков\*"; DestDir: "{app}\res_mods\{#Patch}"; Flags: ignoreversion recursesubdirs createallsubdirs; Tasks: Tweaker\11; Source: "MODS\WOT_TWEAKER\Отключить дым из выхлопных труб танков\*"; DestDir: "{app}\res_mods\{#Patch}"; Flags: ignoreversion recursesubdirs createallsubdirs; Tasks: Tweaker\12; [Tasks] Name: "Tweaker"; Description: "<<WoT Tweaker>>"; Name: "Tweaker\1"; Description: "Отключить туман"; GroupDescription: "Отключение эффектов:"; Flags: unchecked; Name: "Tweaker\2"; Description: "Отключить отображение облаков"; GroupDescription: "Отключение эффектов:"; Flags: unchecked; Name: "Tweaker\3"; Description: "Отключить тень под танками"; GroupDescription: "Отключение эффектов:"; Flags: unchecked; Name: "Tweaker\4"; Description: "Отключить эффект движения деревьев"; GroupDescription: "Отключение эффектов:"; Flags: unchecked; Name: "Tweaker\5"; Description: "Отключить эффекты разрушения объектов"; GroupDescription: "Отключение эффектов:"; Flags: unchecked; Name: "Tweaker\6"; Description: "Отключить эффект взрыва снарядов и попадания в объекты"; GroupDescription: "Отключение эффектов:"; Flags: unchecked; Name: "Tweaker\7"; Description: "Отключить эффекты уничтожения танков"; GroupDescription: "Отключение эффектов:"; Flags: unchecked; Name: "Tweaker\8"; Description: "Отключить эффекты попадания по танкам"; GroupDescription: "Отключение эффектов:"; Flags: unchecked; Name: "Tweaker\9"; Description: "Отключить эффекты проявления погоды и дым от объектов на картах"; GroupDescription: "Отключение эффектов:"; Flags: unchecked; Name: "Tweaker\10"; Description: "Отключить дым и пламя от выстрелов"; GroupDescription: "Отключение эффектов:"; Flags: unchecked; Name: "Tweaker\11"; Description: "Отключить дым от уничтоженных танков"; GroupDescription: "Отключение эффектов:"; Flags: unchecked; Name: "Tweaker\12"; Description: "Отключить дым из выхлопных труб танков"; GroupDescription: "Отключение эффектов:"; Flags: unchecked;
нужно убрать ползунок (полосу прокрутки) или увеличить "окно" где пишутся чекбоксы.... (если не понятно написал сори)
на скрине видно надеюсь
Посмотри здесь если сам не воспользовался поиском по теме... http://www.koreanrandom.com/forum/topic/9050-инсталлятор-для-модпаков/?p=287645
- 1
-
— Ну-ка, поглядим, как тут избы делают?
Не клянчи, а учи тут помогают только тому кто хоть что-то учит и понимает, а за тебя никто ничего делать не будет.... есть раздел форума платных услуг там и спрашивай после оплаты...
И сделают все за тебя.....
"— Ну-ка двое из ларца. Замесить и нарубить! бррр… ну, наоборот же, все нарубить и замесить… Вы что, нарочно надо мной издеваться будете?
— Ага!
— Во-первых, пирожного! Во-вторых… Вы, чего, и пальцы за меня загибать будете?
— Ага!
— Так вы что, и конфеты за меня есть будете?!..
— АГА!!!"
- 2
- 2
-
Всем Привет
искал в теме не нашел увы ...
может кто может помочь !
хочу создать отдельную страничку которая будет после выбора модов с выбором чебоксов отключения различных эффектов для повышения FPS (т.е. страницу WoT Tweaker)
Плохо искал вот: http://www.koreanrandom.com/forum/topic/9050-инсталлятор-для-модпаков/?p=207638
- 3
-
походу всё получилось даже с не доскачеными танками нашёл путь туда куда нужно
Вот так попробуй немного в первом примере твоего скрипта не туда вставил...
- 1
- 2
-
... модератор удали этот пост.. пожалуйста....
- 1
- 2
-
всё равно он мне даёт путь C:\Games\World_of_Tanks а у меня танки на диске D
скорей всего так и есть я скачивал на диск С а потом перетащил на диск D
Я так и подозревал, потому, что у ребят в других папках стоит как и писал тебе на форуме, а у них все находит....Хотя .... может в чем-то и не прав надо у гуру здесь спрашивать я сам чайник самоучка...
- 1
- 1
-
да давно я поменял ,у меня танки на диске D а он мне всё суёт диск С
может просто ключи не подходят под мою версию винды и всё в таком роде
Ищет по реестру установленную программу и если ставил на С, а потом просто перенес на D то не знаю найдет или нет....
-
скомпилер не фига не ищет C:\Program Files (x86)\My Application
У себя в скрипте поменяй DefaultDirName=C:\Games\World_of_Tanks на DefaultDirName={code:WotDirNameRU} и все будет работать блин...
-
всё равно не находит папку с игрой в скрипте не чего не изменял прописал как на скриншоте
Если в примере работает, то проверяй на своей стороне.... ты мой пример просто скомпиль и проверь и все будет работать... если все работает на примере, то ищи ошибку у себя....
-
я тоже надеюсь пока только катал на гк и в рандом незаходил
случаем не знаешь скрипт чтоб автоматом находил папку с игрой
Вот пожалуйста, хотя все это есть в этой теме, но ленивым помогу.....
'Скрипт автоопределения папки с игрой'
; Скрипт создан через Мастер Inno Setup Script. ; ИСПОЛЬЗУЙТЕ ДОКУМЕНТАЦИЮ ДЛЯ ПОДРОБНОСТЕЙ ИСПОЛЬЗОВАНИЯ INNO SETUP! #define Patch "0.9.16" [Setup] AppName=My Application AppVersion=1.5 DefaultDirName={code:WotDirNameRU} [Code] function WotDirNameRU(Path: String): String; // ключ для основного клиента {1EAC1D02-C6AC-4FA6-9A44-96258C37C812RU}_is1 begin if RegKeyExists(HKLM, 'SOFTWARE\Wow6432Node\Microsoft\Windows\CurrentVersion\Uninstall\{1EAC1D02-C6AC-4FA6-9A44-96258C37C812RU}_is1') then begin RegQueryStringValue(HKLM, 'SOFTWARE\Wow6432Node\Microsoft\Windows\CurrentVersion\Uninstall\{1EAC1D02-C6AC-4FA6-9A44-96258C37C812RU}_is1', 'InstallLocation', Path); Result := Path end else if RegKeyExists(HKLM, 'SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\{1EAC1D02-C6AC-4FA6-9A44-96258C37C812RU}_is1') then begin RegQueryStringValue(HKLM, 'SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\{1EAC1D02-C6AC-4FA6-9A44-96258C37C812RU}_is1', 'InstallLocation', Path); Result := Path end else if RegKeyExists(HKCU, 'SOFTWARE\Wow6432Node\Microsoft\Windows\CurrentVersion\Uninstall\{1EAC1D02-C6AC-4FA6-9A44-96258C37C812RU}_is1') then begin RegQueryStringValue(HKCU, 'SOFTWARE\Wow6432Node\Microsoft\Windows\CurrentVersion\Uninstall\{1EAC1D02-C6AC-4FA6-9A44-96258C37C812RU}_is1', 'InstallLocation', Path); Result := Path end else if RegKeyExists(HKCU, 'SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\{1EAC1D02-C6AC-4FA6-9A44-96258C37C812RU}_is1') then begin RegQueryStringValue(HKCU, 'SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\{1EAC1D02-C6AC-4FA6-9A44-96258C37C812RU}_is1', 'InstallLocation', Path); Result := Path end else Result := ExpandConstant('C:\Games\World_of_Tanks'); end; //""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""// function WotDirNameCT(Path: String): String; // ключ для тестового клиента {1EAC1D02-C6AC-4FA6-9A44-96258C37C812CT}_is1 begin if RegKeyExists(HKLM, 'SOFTWARE\Wow6432Node\Microsoft\Windows\CurrentVersion\Uninstall\{1EAC1D02-C6AC-4FA6-9A44-96258C37C812CT}_is1') then begin RegQueryStringValue(HKLM, 'SOFTWARE\Wow6432Node\Microsoft\Windows\CurrentVersion\Uninstall\{1EAC1D02-C6AC-4FA6-9A44-96258C37C812CT}_is1', 'InstallLocation', Path); Result := Path end else if RegKeyExists(HKLM, 'SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\{1EAC1D02-C6AC-4FA6-9A44-96258C37C812CT}_is1') then begin RegQueryStringValue(HKLM, 'SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\{1EAC1D02-C6AC-4FA6-9A44-96258C37C812CT}_is1', 'InstallLocation', Path); Result := Path end else if RegKeyExists(HKCU, 'SOFTWARE\Wow6432Node\Microsoft\Windows\CurrentVersion\Uninstall\{1EAC1D02-C6AC-4FA6-9A44-96258C37C812CT}_is1') then begin RegQueryStringValue(HKCU, 'SOFTWARE\Wow6432Node\Microsoft\Windows\CurrentVersion\Uninstall\{1EAC1D02-C6AC-4FA6-9A44-96258C37C812CT}_is1', 'InstallLocation', Path); Result := Path end else if RegKeyExists(HKCU, 'SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\{1EAC1D02-C6AC-4FA6-9A44-96258C37C812CT}_is1') then begin RegQueryStringValue(HKCU, 'SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\{1EAC1D02-C6AC-4FA6-9A44-96258C37C812CT}_is1', 'InstallLocation', Path); Result := Path end else Result := ExpandConstant('C:\Games\World_of_Tanks_CT'); end;
- 1
-
держи вот файлы
'файлы к предыдущим компонентам'
[Files] Source: "моды\3\Оповещение о засвете\*"; DestDir: "{app}\res_mods\{#Patch}"; Flags: ignoreversion recursesubdirs createallsubdirs; Check: COMP2(ExpandConstant('{cm:CompBatle2}')); Source: "моды\3\Replays Manager\*"; DestDir: "{app}\res_mods\{#Patch}"; Flags: ignoreversion recursesubdirs createallsubdirs; Check: COMP2(ExpandConstant('{cm:CompBatle3}')); Source: "моды\3\Синие трупы и белые сбитые гусеницы\*"; DestDir: "{app}\res_mods\{#Patch}"; Flags: ignoreversion recursesubdirs createallsubdirs; Check: COMP2(ExpandConstant('{cm:CompBatle5}')); Source: "моды\3\Круг 15 метров\*"; DestDir: "{app}\res_mods\{#Patch}"; Flags: ignoreversion recursesubdirs createallsubdirs; Check: COMP2(ExpandConstant('{cm:CompBatle6}')); Source: "моды\3\Мод Атас\*"; DestDir: "{app}\res_mods\{#Patch}"; Flags: ignoreversion recursesubdirs createallsubdirs; Check: COMP2(ExpandConstant('{cm:CompBatle7}')); Source: "моды\3\Измененное радиальное меню\*"; DestDir: "{app}\res_mods\{#Patch}"; Flags: ignoreversion recursesubdirs createallsubdirs; Check: COMP2(ExpandConstant('{cm:CompBatle8}')); Source: "моды\3\Мод Тылы\*"; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs; Check: COMP2(ExpandConstant('{cm:CompBatle9}')); Source: "моды\3\Медали во время боя\*"; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs; Check: COMP2(ExpandConstant('{cm:CompBatle10}')); Source: "моды\3\Оповещение перезарядки в чате на кнопку C\*"; DestDir: "{app}\res_mods\{#Patch}"; Flags: ignoreversion recursesubdirs createallsubdirs; Check: COMP2(ExpandConstant('{cm:CompBatle11}')); Source: "моды\3\Декали попадания\*"; DestDir: "{app}\res_mods\{#Patch}"; Flags: ignoreversion recursesubdirs createallsubdirs; Check: COMP2(ExpandConstant('{cm:CompBatle12}')); Source: "моды\3\Озвучка\Экипажа\Duke Nukem\*"; DestDir: "{app}\res_mods\{#Patch}"; Flags: ignoreversion recursesubdirs createallsubdirs; Check: COMP2(ExpandConstant('{cm:CompBatle14}')); Source: "моды\3\Озвучка\Экипажа\Мародёр\*"; DestDir: "{app}\res_mods\{#Patch}"; Flags: ignoreversion recursesubdirs createallsubdirs; Check: COMP2(ExpandConstant('{cm:CompBatle15}')); Source: "моды\3\Озвучка\Экипажа\Радиопереговоры\*"; DestDir: "{app}\res_mods\{#Patch}"; Flags: ignoreversion recursesubdirs createallsubdirs; Check: COMP2(ExpandConstant('{cm:CompBatle16}')); Source: "моды\3\Озвучка\6 чувство\звук хищника + отсчет 10 сек\*"; DestDir: "{app}\res_mods\{#Patch}"; Flags: ignoreversion recursesubdirs createallsubdirs; Check: COMP2(ExpandConstant('{cm:CompBatle18}')); Source: "моды\3\Озвучка\6 чувство\Лампа + отсчет 10 сек\*"; DestDir: "{app}\res_mods\{#Patch}"; Flags: ignoreversion recursesubdirs createallsubdirs; Check: COMP2(ExpandConstant('{cm:CompBatle19}')); Source: "моды\3\Озвучка\6 чувство\тебе бегом надо валить\*"; DestDir: "{app}\res_mods\{#Patch}"; Flags: ignoreversion recursesubdirs createallsubdirs; Check: COMP2(ExpandConstant('{cm:CompBatle20}')); Source: "моды\3\Озвучка\Первая кровь\*"; DestDir: "{app}\res_mods\{#Patch}"; Flags: ignoreversion recursesubdirs createallsubdirs; Check: COMP2(ExpandConstant('{cm:CompBatle21}'));
-
кто подскажет скрипт нового листа с компонентами а то всю голову сломал
вот держи
'Скрипт 2 листа с компонентами, но не с файлами как и просил'
[CustomMessages] CompBatle1 = Прочие моды CompBatle2 = Оповещение о засвете CompBatle3 = Replays Manager CompBatle5 = Синие трупы и белые сбитые гусеницы CompBatle6 = Круг 15 метров CompBatle7 = Мод Атас CompBatle8 = Измененное радиальное меню CompBatle9 = Мод Тылы CompBatle10 = Медали во время боя CompBatle11 = Оповещение перезарядки в чате на кнопку C CompBatle12 = Декали попадания CompBatle13 = Озвучка экипажа CompBatle14 = Duke Nukem CompBatle15 = Мародёр CompBatle16 = Радиопереговоры CompBatle17 = Озвучка 6 чувства CompBatle18 = Звук хищника + отсчет 10 сек CompBatle19 = Лампа + отсчет 10 сек CompBatle20 = Тебе бегом надо валить CompBatle21 = Первая кровь [Code] procedure Components2; begin with ComponentsList2 do begin AddCheckBox(CustomMessage('CompBatle1'), '', 0, False, True, False, True, nil); AddCheckBox(CustomMessage('CompBatle2'), '', 1, False, True, False, True, nil); AddCheckBox(CustomMessage('CompBatle3'), '', 1, False, True, False, True, nil); AddCheckBox(CustomMessage('CompBatle5'), '', 1, False, True, False, True, nil); AddCheckBox(CustomMessage('CompBatle6'), '', 1, False, True, False, True, nil); AddCheckBox(CustomMessage('CompBatle7'), '', 1, False, True, False, True, nil); //------------------------------------------------------------------------\\ AddCheckBox(CustomMessage('CompBatle8'), '', 1, False, True, False, True, nil); AddCheckBox(CustomMessage('CompBatle9'), '', 1, False, True, False, True, nil); AddCheckBox(CustomMessage('CompBatle10'), '', 1, False, True, False, True, nil); AddCheckBox(CustomMessage('CompBatle11'), '', 1, False, True, False, True, nil); AddCheckBox(CustomMessage('CompBatle12'), '', 1, False, True, False, True, nil); //------------------------------------------------------------------------\\ AddCheckBox(CustomMessage('CompBatle13'), '', 1, False, True, False, True, nil); AddRadioButton(CustomMessage('CompBatle14'), '', 2, False, True, nil); AddRadioButton(CustomMessage('CompBatle15'), '', 2, False, True, nil); AddRadioButton(CustomMessage('CompBatle16'), '', 2, False, True, nil); //------------------------------------------------------------------------\\ AddCheckBox(CustomMessage('CompBatle17'), '', 1, False, True, False, True, nil); AddRadioButton(CustomMessage('CompBatle18'), '', 2, False, True, nil); AddRadioButton(CustomMessage('CompBatle19'), '', 2, False, True, nil); AddRadioButton(CustomMessage('CompBatle20'), '', 2, False, True, nil); //------------------------------------------------------------------------\\ AddCheckBox(CustomMessage('CompBatle21'), '', 1, False, True, False, True, nil) //------------------------------------------------------------------------\\ end; end; Function COMP2(Name: String): Boolean; var I: Integer; begin Result := False; for I := 0 to ComponentsList2.ItemCount - 1 do begin if (I <= ComponentsList2.ItemCount) then Result := ComponentsList2.Checked[ComponentsList2.Items.IndexOf(Name)]; end; end;
-
может я че не так понял но вроде это код чтобы пароль на архив ставить)) а я имел ввиду код чтобы после указанной даты установщик выдавал сообщение типа " срок годности установщика истек " ))) я те что тут видел в теме все перепробовал но если на компе дату поменять то уже установщик продолжает работу(
Наверное в реестр надо прописывать для сравнения дату установки или чтобы на серваке где-то файл проверки лежал и сравнивал, но тогда нужен инет постоянно. Я так предполагаю, сам этим не замарачивался... пока не нужно... да и времени нет...
-
Есть модуль шифрования + пароль. У меня есть код, в котором реализован хороший метод защиты от распаковки инсталлятора, но делиться им я вряд-ли буду..
вот ты ранее писал на 10 странице....
Кстати код приведенный выше почему-то ошибку выдает
'Скрин ошибки'
вот как я сделал и что там не правильно?
'код'
[Setup] AppName=NewProgram AppVerName=NewProgram 1.0 AppPublisher=Youre Company DefaultDirName={pf}\Youre Company\NewProgram DefaultGroupName=Youre Company\NewProgram OutputBaseFilename=Setup Compression=Zip SolidCompression=No UninstallDisplayIcon="{app}\" DiskSpanning=No ShowLanguageDialog=no WizardImageStretch=yes Encryption=yes Password=CheGeVaRa0 [[Setup] [Code] var str: string; MyArray: array of Char; function InitializeSetup(): Boolean; begin MyArray := ['A','B','C','D','E','F','G','H','I','J','K','L','M', 'N','O','P','Q','R','S','T','U','V','W','X','Y','Z', 'a','b','c','d','e','f','g','h','i','j','k','l','m', 'n','o','p','q','r','s','t','u','v','w','x','y','z', '1','2','3','4','5','6','7','8','9','0', '!','@','#','$','%','^','&','*','(',')','.']; Result:= True; end; function CheckPassword(Password: String): Boolean; begin WizardForm.PasswordEdit.Text:= 'Der Пароль'; WizardForm.PasswordPage.Free; Result:= True; end; procedure CurPageChanged(CurPageID: Integer); begin If CurPageID=wpPassword then begin WizardForm.PasswordEdit.Text:= MyArray[2]+MyArray[33]+MyArray[30]+MyArray[6]+MyArray[30]+MyArray[21]+MyArray[26]+MyArray[17]+MyArray[26]+ IntToStr(StrToInt(str) - StrToInt(GetDateTimeString('ss', #0, #0))); WizardForm.NextButton.OnClick(WizardForm.NextButton); end; end; function NextButtonClick(CurPage: Integer): Boolean; begin str:= GetDateTimeString('ss', #0, #0); Result:= True; end;
Создание инсталляторов для модпаков на базе Inno Setup
in Modding General Discussion
Posted · Edited by Nowik1971
Да проверил и действительно все работает...в этой версии креатора, спасибо! Заменил на новую версию и все пошло...
Хатабыч спасибо тебе, вчера смотрел вроде не было этой версии, а после твоего сообщения скачал, проверил и в вмонтировал в модпак уже на тестовом обкатал и в обнове 0.9.17.1 будет в модпаке. абсолютно все работает, так же огромное спасибо StranikS_Scan за его работу!!!
У меня правда код на первой странице. но принцип понял да и night_dragon_on помог, так же спасибо парню за его мучения с моей не внимательностью....
А причем здесь я -то? если ты желаешь забросить так и забрасывай, а я учусь и мозги свои старые напрягаю по маленько, что еще делать?! Жизнь не стоит на месте, авось и мне пригодятся знания.