Код:
_GUICtrlTab_InsertItem($hTab, 0, "Tab 1")
Создал сколько нада табов, а как в них кнопки вставлять?) У меня все кнопки во всех табах появляются.
Вопрос попутный.
В основном окне есть окно лога, которое создается :
Код:
$iMemo = GUICtrlCreateEdit("", 0, 0, 400, 300, $ES_AUTOVSCROLL + $WS_VSCROLL)
При создании табов, окно лога получается во всех табах, впрочем как и кнопки )
Код примерно такой :
Код:
Global $iMemo
Global $hTab
_Main()
Func _Main()
Local $hEventLog, $hGUI, $hEvent, $iResult
; Create GUI
$hGUI = GUICreate("AutoBot", 500, 300)
$hTab = _GUICtrlTab_Create($hGUI, 2, 2, 500, 300)
$okbutton1 = GUICtrlCreateButton($Butname1, 405, 1, 80)
$okbutton2 = GUICtrlCreateButton($Butname2, 405, 30, 80)
$okbutton3 = GUICtrlCreateButton($Butname3, 405, 60, 80)
$okbutton4 = GUICtrlCreateButton($Butname4, 405, 90, 80)
$iMemo = GUICtrlCreateEdit("", 0, 25, 400, 300, $ES_AUTOVSCROLL + $WS_VSCROLL)
GUICtrlSetFont($iMemo, 9, 400, 0, "Courier New")
GUICtrlSetBkColor(-1, 0x000000)
GUICtrlSetColor(-1, 0xFFDAB9)
GUISetState()
GUIRegisterMsg($WM_NOTIFY, "WM_NOTIFY")
; Add tabs
_GUICtrlTab_InsertItem($hTab, 0, "Tab 1")
_GUICtrlTab_InsertItem($hTab, 1, "Tab 2")
_GUICtrlTab_InsertItem($hTab, 2, "Tab 3")
; Loop until user exits