Tosyk
Новичок
- Сообщения
- 206
- Репутация
- 0
Приступил к написанию скрипта для установки модификаций в игру Мафия.
большая часть работы была проделана тут: http://autoit-script.ru/threads/zam...fajle-na-polnoe-soderzhimoe-iz-drugogo.27342/
Как поместить в выпадающий список имена машин из INI файлов? Мой текущий скрипт:
пример ИНИ файла:
большая часть работы была проделана тут: http://autoit-script.ru/threads/zam...fajle-na-polnoe-soderzhimoe-iz-drugogo.27342/
Как поместить в выпадающий список имена машин из INI файлов? Мой текущий скрипт:
Код:
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <TreeViewRCH.au3>
#include <File.au3>
#include <Array.au3>
Global $aINI, $sList
Global $aNamesBlock[1][2] = [['Имя блока', 'Позиция начала записи']], $sPathRCAR = '', $sPathVehicles = ''
Global $hVehiclesRW = GUICreate('VehiclesRW', 266, 254, -1, -1)
Global $nTreeView1 = GUICtrlCreateTreeView(300, 16, 225, 177, BitOR($TVS_HASBUTTONS, $TVS_HASLINES, $TVS_LINESATROOT, $TVS_DISABLEDRAGDROP, $TVS_SHOWSELALWAYS))
Global $sFont = "Segoe UI"
Global $nNewVehicles = GUICtrlCreateLabel('Choose new car:', 12, 7, 78, 25)
Global $hNewVehCombo = GUICtrlCreateCombo("", 12, 25, 242, 23)
Global $hSpecGroup = GUICtrlCreateGroup("New car included:", 12, 60, 242, 91)
Global $nNewVehCol = GUICtrlCreateLabel('Car colors:', 30, 84, 78, 25)
Global $nNewVehCol = GUICtrlCreateLabel('4', 92, 84, 78, 25)
Global $nNewVehShd = GUICtrlCreateLabel('Shadow:', 30, 104, 78, 25)
Global $nNewVehShd = GUICtrlCreateLabel('Yes', 80, 104, 78, 25)
Global $nNewVehAud = GUICtrlCreateLabel('Sounds:', 30, 124, 78, 25)
Global $nNewVehAud = GUICtrlCreateLabel('No', 78, 124, 78, 25)
Global $nNewVehSpc = GUICtrlCreateLabel('Specifications:', 128, 84, 78, 25)
Global $nNewVehSpc = GUICtrlCreateLabel('Yes', 210, 84, 78, 25)
Global $nNewVehDam = GUICtrlCreateLabel('Damage model:', 128, 104, 78, 25)
Global $nNewVehDam = GUICtrlCreateLabel('Yes', 218, 104, 78, 25)
Global $nNewVehTex = GUICtrlCreateLabel('Textures:', 128, 124, 78, 25)
Global $nNewVehTex = GUICtrlCreateLabel('113', 180, 124, 78, 25)
Global $nMafVehicles = GUICtrlCreateLabel('Choose car to replace:', 12, 164, 150, 25)
Global $hMafVehCombo = GUICtrlCreateCombo("", 12, 182, 242, 23)
Global $nVehicles = GUICtrlCreateButton('Replace', 46, 220, 78, 25)
Global $nSblockB = GUICtrlCreateButton('Default', 137, 220, 78, 25)
;~ Global $nSBlock = GUICtrlCreateInput('', 256, 56, 233, 21)
;~ Global $nPathRCAR = GUICtrlCreateInput('', 16, 608, 473, 21, $ES_READONLY)
Global $nGetRCAR = GUICtrlCreateButton('*.RCAR', 368, 640, 123, 25)
Global $nRWVeh = GUICtrlCreateButton('Записать', 256, 312, 122, 25)
GUISetState()
Local $Icopath = @ScriptDir
Local $aIco[4] = [$Icopath & '\chk.ico', $Icopath & '\unchk.ico', $Icopath & '\rd.ico', $Icopath & '\unrd.ico']
_GUITreeViewEx_InitTV($nTreeView1)
_GUITreeViewEx_TvImg($nTreeView1, $aIco)
While 1
Switch GUIGetMsg()
Case 1
Exit
Case $nVehicles
;~ Local $sFPath = (@ScriptDir & '\tables\' & 'vehicles.bin')
;~ Local $sFObin = FileOpen($sFPath)
$aINI = _FileListToArray(@ScriptDir, '_cm*.ini', 1)
; And here we get the elements into a list
$sList = ""
For $i = 0 To UBound($aINI,1) -1
$sList &= "|" & $aINI[$i][0]
Next
; And fill it
GUICtrlSetData($nNewVehicles, $sList)
;~ If IsArray($aINI) Then
;~ _ArrayDisplay($aINI)
;~ Else
;~ MsgBox(0, "Desktop", "No JPG files found")
;~ EndIf
Case $nGetRCAR
Local $sFObin = FileOpenDialog('Vehicles.bin', @ScriptDir, '(*.rcar)', 0, '', $hVehiclesRW)
If Not @error Then
$sPathRCAR = $sFObin
;~ GUICtrlSetData($nPathRCAR, $sPathRCAR)
EndIf
Case $nRWVeh
_GetDataRcarWR()
EndSwitch
WEnd
пример ИНИ файла: