bulldog5293
Знающий
- Сообщения
- 172
- Репутация
- 10
Если не трудна, то есть код:
Не могу понять почему у меня не высвечиваются другие табы :'(
Код:
#include <GUIConstants.au3>
#include <GUIConstantsEx.au3>
#include <GuiListView.au3>
$ADDR=@ScriptDir&"\text.txt"
$FILE=FileOpen($ADDR,0) ; Режим чтения
$TEXT=FileRead($FILE)
FileClose($FILE)
$TEXT=StringReplace($TEXT,@CRLF,"|")
For $i = 1 To 3
$Text &= FileReadLine("text.txt", $i) & "|"
Next
$BminerFrm = GUICreate("My GUI", 610, 350 , 180, 100) ; will create a dialog box that when displayed is centered
$tab=GUICtrlCreateTab (0,0, 650,349)
$tab0=GUICtrlCreateTabitem ("Настройки ")
$btShow = GUICtrlCreateButton ("Настройки ", 490, 30, 120, 20)
$LognPassDlg = GUICreate ( "Введите ваши данные", 502, 392, 192, 124,'', '', $BminerFrm ) ; Установив принадлежность к $BminerFrm
$List = GUICtrlCreateListView("----------------------------------------------------------------------", 1, 1, 250, 350, $LVS_NOCOLUMNHEADER + $LVS_SHOWSELALWAYS)
$item1=GUICtrlCreateListViewItem($Text, $List)
GUICtrlSetData($item1,$Text)
$tab1=GUICtrlCreateTabitem ("вкладка 2 ")
GUICtrlSetState(-1,$GUI_SHOW)
$tab2=GUICtrlCreateTabitem ("вкладка3 ")
$tab3=GUICtrlCreateTabitem ("вкладка4 ")
$tab4=GUICtrlCreateTabitem ("вкладка5 ")
$tab5=GUICtrlCreateTabitem ("вкладка ")
GUICtrlCreateTabitem ("")
GUISetState (@SW_SHOW, $BminerFrm ) ; will display an empty dialog box
Func ShowWindow()
GUISetState(@SW_SHOW, $LognPassDlg)
EndFunc
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $btShow
ShowWindow()
EndSwitch
WEnd
Не могу понять почему у меня не высвечиваются другие табы :'(