ZeVSalt
Я не лупоглазый, это прищур такой !
- Сообщения
- 136
- Репутация
- 0
Добрый день.
При открытии списка категории вместо названия категории показывается число (1024), подскажите где ошибка.
При открытии списка категории вместо названия категории показывается число (1024), подскажите где ошибка.
Код:
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <TreeViewConstants.au3>
$Region_file = FileOpen ("Region.txt",0)
$Read_Region_File = FileRead ( $Region_file, 1000)
Opt('GUIResizeMode', 802)
$hGui = GUICreate("", 640, 410, -1, -1, $WS_OVERLAPPEDWINDOW)
$infobutton = GUICtrlCreateButton("Показать", 350, 5, 100, 25)
$Button_Region_S = GUICtrlCreateButton ("Выбрать регион", 10, 40, 145, 25)
$Combo_Region = GUICtrlCreateCombo("Выберите регион", 10, 5, 145, 25)
GUICtrlSetData(-1, $Read_Region_File)
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
$treeview = GUICtrlCreateTreeView(5, 80, 200, 320)
$Edit = GUICtrlCreateEdit("Выберите категорию", 210, 80, 425, 320)
$Ammunition = GUICtrlCreateTreeViewItem("Боеприпасы и заряды", $treeview)
GUICtrlSetColor(-1, 0x0000C0)
$Hybrid = GUICtrlCreateTreeViewItem("Гибридные боеприпасы", $Ammunition)
$St_Hybrid = GUICtrlCreateTreeViewItem("Стандартные заряды", $Hybrid)
$St_Hybrid_L = GUICtrlCreateTreeViewItem("Большие", $St_Hybrid)
$Antimatter_L = GUICtrlCreateTreeViewItem("Antimatter Charge L", $St_Hybrid_L)
GUISetState()
While 1
$msg = GUIGetMsg()
Switch $msg
Case $Ammunition
GUICtrlSetState($Ammunition, $GUI_EXPAND)
Case $Hybrid
GUICtrlSetState($Hybrid, $GUI_EXPAND)
Case $St_Hybrid
GUICtrlSetData($St_Hybrid, $GUI_EXPAND)
;~
Case $St_Hybrid_L
GUICtrlSetData($St_Hybrid_L, $GUI_EXPAND)
Case $Antimatter_L
GUICtrlSetData($Edit, 'Нажмите кнопку "Показать"')
;~ Здесь вставить функцию показа цены товара
Case $infobutton
$Combo_Region_R = GUICtrlRead($Combo_Region)
msgbox(0,"list=", $Open_File_S_Sys)
Case $Button_Region_S
$Combo_Region_R = GUICtrlRead($Combo_Region)
$Open_File_S_Sys = FileOpen ( $Combo_Region_R, 0)
$Read_S_Sys_File = FileRead ($Open_File_S_Sys, 1000)
$Combo_S_Sys = GUICtrlCreateCombo("", 170, 5, 145, 25)
GUICtrlSetData(-1, $Read_S_Sys_File)
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
Case -3
Exit
EndSwitch
WEnd