Jump to content
Korean Random

DuMaH_K

User
  • Content Count

    83
  • Joined

  • Last visited

Everything posted by DuMaH_K

  1. @night_dragon_on да, но повторюсь, запуская ваш код у себя, я получаю нечто, вовсе не относящееся к клиенту..
  2. ваш экзешник обнаруживает клиент песочницы распаковка поверх примера из шапки и компиляция дает в результате тот же путь что и в моем предыдущем посте
  3. не выходит. использовал ваш кусок кода в тестовом примере скрипта из шапки и получил путь к исполняемому файлу инсталлятора+"\метка_диска" Видимо это как-то по другому должно работать или у меня руки совсем не оттуда... #define GameID "{5F05CE9B-7768-490E-9A71-C6R92B4EX123}" ;Ид инстолятора #define MyAppName "KPAH Mod Pack 0.8.6" ;Название инстоллятора #define MyInfoVer "2.4.124" ;Версия инсталлятора #define MyAppVer "1.0" ;Версия игры #define MyAppPublisher "EvilAlex" ;Имя компании или человека кто делал #define MyAppURL "http://www.koreanrandom.com" ;Ссылка для лого ;#include "Components.iss" ;Компаненты, они же моды #include "Messages.iss" ;Сообщение, надписи на кнопках и т.д. [Setup] AppId={{#GameID} AppName={#MyAppName} AppVersion={#MyAppVer} ;AppVerName={#MyAppName} {#MyAppVersion} AppPublisher={#MyAppPublisher} //====={ Ссылки }=====\\ AppPublisherURL={#MyAppURL} AppSupportURL={#MyAppURL} AppUpdatesURL={#MyAppURL} //====={ Папка устанвки }=====\\ ;DefaultDirName={pf}\{#MyAppName} DefaultDirName={code:Get_Wot_Dir} DefaultGroupName={#MyAppName} //====={ Картинки }=====\\ SetupIconFile=Files\wot_ico.ico WizardSmallImageFile=Files\img2.bmp WizardImageFile=Files\img1.bmp //====={ Отключение строниц }=====\\ DisableProgramGroupPage=yes //====={ Лицензия и Фак }=====\\ LicenseFile=licensia.txt InfoBeforeFile=faq.rtf //====={ Папка создания и название сетапа }=====\\ OutputDir=.\Output OutputBaseFilename=Setup //====={ Сжатие сетапа }=====\\ InternalCompressLevel=ultra64 Compression=lzma2/ultra64 SolidCompression=true //====={ Основные файлы сетапа }=====\\ [Files] Source: Files\logo.bmp; Flags: dontcopy noencryption noencryption Source: "findwot.dll"; DestDir: "{tmp}"; Flags: ignoreVersion dontcopy; //====={ Выбор языка }=====\\ [Languages] Name: "eng"; MessagesFile: "compiler:Default.isl" Name: "rus"; MessagesFile: "compiler:Languages\Russian.isl" [Code] procedure WOT_GetClientPathW(Buffer: String; BufferSize: Integer; ClientIndex: Integer); external 'WOT_GetClientPathW@files:findwot.dll cdecl'; function Get_Wot_Dir(Param: String): String; var FoundDir: String; begin SetLength(FoundDir, 1024); WOT_GetClientPathW(FoundDir, 1024, 0); if not VarIsNull(FoundDir) then Result:=ExpandConstant(FoundDir) else Result:=ExpandConstant('{sd}\Games\World_of_Tanks') end; procedure LogoOnClick(Sender: TObject); var ResCode: Integer; begin ShellExec('', '{#MyAppURL}', '' , '', SW_SHOW, ewNoWait, ResCode) end; procedure RedesignWizardForm; var i: integer; BtnPanel: TPanel; BtnImage: TBitmapImage; begin ExtractTemporaryFile('logo.bmp') BtnPanel:=TPanel.Create(WizardForm) with BtnPanel do begin Left:=0 Top:=315 Width:=179 Height:=46 Cursor:=crHand OnClick:=@logoOnClick Parent:=WizardForm end; BtnImage:=TBitmapImage.Create(WizardForm) with BtnImage do begin AutoSize:=True; Enabled:=False; Bitmap.LoadFromFile(ExpandConstant('{tmp}')+'\logo.bmp') Parent:=BtnPanel end; with WizardForm do begin Caption := ExpandConstant('{cm:Main}'); end; with WizardForm.WizardBitmapImage do begin Width := ScaleX(502); end; with WizardForm.WelcomeLabel2 do begin Visible := False; end; with WizardForm.WelcomeLabel1 do begin Visible := False; end; with WizardForm.WizardSmallBitmapImage do begin Left := ScaleX(0); Width := ScaleX(502); Height := ScaleY(70); end; with WizardForm.PageDescriptionLabel do begin Visible := False; end; with WizardForm.PageNameLabel do begin Visible := False; end; with WizardForm.WizardBitmapImage2 do begin Width := ScaleX(502); end; with WizardForm.FinishedLabel do begin Visible := False; end; with WizardForm.FinishedHeadingLabel do begin Visible := False; end; end; procedure InitializeWizard(); begin RedesignWizardForm; end;
  4. Товарищи, простите если что не так сразу) Использую код приведенный ниже для определения каталога установки клиента. И установщик упорно отказывается находить нужный каталог, в то время как протанки, вотспики и прочие - замечательно всё находят. Я уже хз куда копать... Наставьте на путь истинный, если не сложно) 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; Заранее благодарю
  5. Всех с новым годом! #щастьздоровья =) кстати, а в курсе кто нибудь - можно ли увеличить максимальный размер карты? чтобы к примеру на весь экран растянуть её можно было через xvm ограничено увеличение - кратность больше 5 - не воспринимается ... "zoom": { // Zoom index value for minimap zoom key (0..5). // Значение масштаба миникарты при нажатии клавиши масштаба (0..5). "index": 5, // false - does not set zoomed minimap at display center. // false - не устанавливать увеличенную миникарту по центру экрана. "centered": true }, ...
  6. обновил xvm, и видимо этот файл заменился. @ktulho спасибо)
  7. @demon2597 Дим, уж не знаю что случилось, но после вчерашней микрообновы на твоем конфиге игра стала намертво зависать в момент попадания в танк. На дефолтном конфиге этот момент проходит без проблем. python.log
  8. попробуй почистить кэш игры и xvm. мне вроде помогает
  9. Бывают вылеты, но на этом конфиге ваще жесть. Среди боя намертво зависает, почти каждый бой. =(
  10. @SRV 13 конфиг - это лишь файлы для настройки мода XVM. Мод устанавливать нужно обязательно, а после - уже конфиг. А в твоем случае - ты купил ключи что бы завести машину, но машины у тебя нет)
  11. Чиво ты нипонил, видимо как у юшки хочет: показывается только когда подсадка на расстоянии меньше 300 метров , либо OnKeyHold или КейПресс =)
  12. @ЛОМ это особый, шаманский способ раскатки танка чтобы усилить сцепление с грунтом и заезжать на отвесные скалы)
  13. Поставил новый хвм и конфиг димы (версию от дракона) - игра стала вылетать в снайперском прицеле почти каждый бой
  14. Посмотрите даты изменения файлов и поймете какие файлы менять
  15. Не все же удалили, мод актуальность не потерял. Постоянно пользовался им...
  16. я бы рад помочь, но с моими клешнями это не актуально. Тут нужны люди которые умеют в подсадки на большинстве танков, иначе получится что уберутся нормальные подсадки, в которые просто не смог отдельный игрок
  17. По мегабайту для каждого танка? Представляю что будет в итоге... Из нескольких сотен килобайт превратится в порядка трех сотен мегабайт
  18. ко всему прочему его же противник еще и снять может аптечкой, это считается? А если он пропал из засвета и потом снял оглушение - так вовсе инфа будет не верная. Сомневаюсь что подобная инфа будет в конфиге, т.е. вообще в xvm [imho]
  19. Не знаю у кого как, а я просто установил новую версию поверх старой, перезагрузил комп и всё норм. Никогда не ломал голову с удалением/чистой установкой шрифта. А такое ощущение что люди пытаются изобрести велосипед... При чем с квадратными колесами
  20. По поводу иконок - периодически пропадают иконки союзников (в ушах и по Tab), а потом таким же магическим образом появляются... Мистика какая-то. А так же иногда надпись "Машина уничтожена! (танк)" съезжает в право, при чем на столько что кажется отсчет координаты Х ведется не от края экрана, а от середины. Пока без скринов, но если надо - поймаю
  21. Методом проб и ошибок. Без XVM, но с целым комплектов других модов - всё работает стабильно, но с установленным XVM+конфиг от тезки (другие не перевариваю ) + пара безобиных модов вроде быстрого ремонта в бою - игра вылетает 2-3 а то и более раз в день. То драйвер видеокарты "восстановлен", то просто так без всяких уведомлений. Надпись "Не хватает памяти, перезапустите игру" вообще постоянно висит. А настройки - самые минимальные, вот просто меньше некуда, отключены все эффекты, даже через вот твикер.
  22. Частенько вылетает с XVM-ом из-за нехватки памяти. К сожалению не для слабых компов все эти плюхи)
×
×
  • Create New...