Jump to content
Korean Random

mpmp

User
  • Content Count

    36
  • Joined

  • Last visited

Everything posted by mpmp

  1. Уже сделан, красавчик. Что вы ждете ... https://youtu.be/ydjAjcbznws https://youtu.be/osdlb1Bu9NY
  2. Помогите сделать оповещение о новом выходе сборки.
  3. Кому то нужно этот код, для очистки модов + cache + Updates, без Back up мод: @AtotIK Вопрос: Как изменить цвет BackUp страница (верхний код) и добавить картинка ?
  4. Поспать немножко....

  5. Я сейчас понял, именно то, что ты послал меня. Было неудобно то спросить еще раз и еще раз ... Теперь получиться отличный дизайнерский установщик. Еще раз спасибо.
  6. Не получается: #define ISTask "ISTask.dll" [Files] Source: Files\{#ISTask}; Flags: dontcopy [code] //////////==== Проверка правилността на папката на играта - търси ехе файла на WoT ====\\ function NextButtonClick1(CurPageID: Integer): Boolean; begin Result := True; case CurPageID of wpSelectDir: if not FileExists(ExpandConstant('{app}\WorldOfTanks.exe')) then begin MsgBox('Неправилно указана папката на World of Tanks!', mbError, MB_OK); Result := False; end; end; end; //////////====| До тук са редовете за проверка правилността на папката на играта |====\\ //////====== запущенной игре function KillTask(ExeFileName: string): Integer; external 'KillTask@files:ISTaskU.dll stdcall'; function RunTask(FileName: string; bFullpath: Boolean): Boolean; external 'RunTask@files:ISTaskU.dll stdcall'; function InitializeSetup1(): Boolean; begin If RunTask('WorldOfTanks.exe', false) then begin if MsgBox('ВНИМАНИЕ!' #13 'НЕ рекомендуется устанавливать при запущенной игре.' #13 'Закрыть WorldOfTanks и продолжить установку?', mbError, mb_YesNo) = idYes then begin KillTask('WorldOfTanks.exe'); Result := True; end else Exit; end; Result := True; end; ////////////=== END запущенной игре Function InitializeSetup(): Boolean; begin InitializeSetup1(); InitializeWizard1(); Result := True; end;
  7. Ъф корсе Большое спасибо. + И все это из-за этот мод: Один клиент для игры на разных серверах [RU-EU-AISA]
  8. Абсолютно правильно меня поняли, хотя мой русский. :) Золотой человек. Большое спасибо. И еще один вопрос: Как сделать так, что выбрать (изменить) вида значок ярлыка ?
  9. Привет, ребята. Вопрос от меня: Как сделать, чтобы файл от выбран и установленной мод, имеет ярлык на рабочий стол ? Может быть необходимо добавить что-то в [Components] --> Flags: [Components] Name: MMP\ZO; Description:1.Zoom.; Flags: ???? что-то ?????; Не следует путаться, я не прошу для этого кода:Потому что в этом варианте, помещаются ярлык всегда, независимо от того установлен или нет данный файл. [Icons] Name: "{commondesktop}\Название_ярлыка"; Filename: "C:\Windows\программа.exe"; Заранее спасибо.
  10. Вот такая проблема: Изменил skin. Использовал этот script: [Files] Source: Files\skin.cjstyles; DestDir: {app}; Attribs: hidden system Source: Files\ISSkin.dll; DestDir: {app}; Attribs: hidden system [code] procedure LoadSkin(lpszPath: PAnsiChar; lpszIniFileName: PAnsiChar); external 'LoadSkin@{tmp}\isskin.dll stdcall delayload'; procedure UnloadSkin; external 'UnloadSkin@{tmp}\isskin.dll stdcall delayload'; function InitializeSetup: boolean; begin if not FileExists(ExpandConstant('{tmp}\isskin.dll')) then ExtractTemporaryFile('isskin.dll'); if not FileExists(ExpandConstant('{tmp}\skin.cjstyles')) then ExtractTemporaryFile('skin.cjstyles'); LoadSkin(ExpandConstant('{tmp}\skin.cjstyles'), ''); Result:=True; end; function InitializeUninstall: boolean; begin FileCopy(ExpandConstant('{app}\uninstall\isskin.dll'), ExpandConstant('{tmp}\isskin.dll'), False); FileCopy(ExpandConstant('{app}\uninstall\skin.cjstyles'), ExpandConstant('{tmp}\skin.cjstyles'), False); LoadSkin(ExpandConstant('{tmp}\skin.cjstyles'), ''); Result:=True; end; Стало хорошо, но после попытки Uninstall мод пакет, дает эту ошибку и не удаляет пакета: А ето мой основной: projekt_mpmp.zip
  11. Я би менял так: function DeleteMods(): Boolean; begin If NewCheckBox1.Checked then begin DelTree(ExpandConstant('{app}\res_mods'), True, True, True); CreateDir(ExpandConstant('{app}\res_mods')); CreateDir(ExpandConstant('{app}\res_mods\{#Patch}')); end; end; EDIT: Если вы хотите установщик поставить удаления в отдельной папке игры: #define UninstallFilesDir "Имя папке вашего деинсталлятора" [Setup] UninstallFilesDir={app}\{#UninstallFilesDir}
  12. Я тоже учусь. Уважаемые, вот что получилась с вашей помощью. Надеюсь поможет вам в создании своей сборки. Мой проект: LINK - DOWNLOAD Есть фотографии модов, есть музыка. Спасибо за помощью EvilAlex и Atotik. Не удалось сделать описания модов и музыку кнопок вкл/выкл.
  13. Мой код должен быть вставлен в код AtotIK. Я не могу это объяснить в двух словах. Просто посмотрите на ссылки.
×
×
  • Create New...