Что нового

Нубский вопрос - как встроить кнопку в Таб?

maddoc

Новичок
Сообщения
48
Репутация
2
Код:
_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
 

Garrett

Модератор
Локальный модератор
Сообщения
3 999
Репутация
964
а как в них кнопки вставлять?
При создании табов, окно лога получается во всех табах, впрочем как и кнопки
Код:
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <TabConstants.au3>
#include <WindowsConstants.au3>

_Main()

Func _Main()

; Create GUI
	$Form1 = GUICreate("AutoBot", 500, 300)
	$Tab1 = GUICtrlCreateTab(2, 2, 500, 300)
	
	$TabItem1 = GUICtrlCreateTabItem("Tab 1")
	$Button1 = GUICtrlCreateButton("Button1", 405, 25, 80)
	$iMemo1 = GUICtrlCreateEdit("", 0, 25, 400, 275)
	GUICtrlSetFont($iMemo1, 9, 400, 0, "Courier New")
	GUICtrlSetBkColor(-1, 0x000000)
	GUICtrlSetColor(-1, 0xFFDAB9)
	GUISetState()
	
	$TabItem2 = GUICtrlCreateTabItem("Tab 2")
	GUICtrlSetState(-1,$GUI_SHOW)
	$Button2 = GUICtrlCreateButton("Button2", 405, 25, 80)
	$iMemo2 = GUICtrlCreateEdit("", 0, 25, 400, 275)
	GUICtrlSetFont($iMemo2, 9, 400, 0, "Courier New")
	GUICtrlSetBkColor(-1, 0xff0000)
	GUICtrlSetColor(-1, 0xFFDAB9)
	GUISetState()
	GUICtrlCreateTabItem("")
		
	$TabItem3 = GUICtrlCreateTabItem("Tab 3")
	GUICtrlSetState(-1,$GUI_SHOW)
	$Button3 = GUICtrlCreateButton("Button3", 405, 25, 80)
	$iMemo3 = GUICtrlCreateEdit("", 0, 25, 400, 275)
	GUICtrlSetFont($iMemo3, 9, 400, 0, "Courier New")
	GUICtrlSetBkColor(-1, 0xDD00CC)
	GUICtrlSetColor(-1, 0xFFDAB9)
	GUISetState()
	GUICtrlCreateTabItem("")
	
	$TabItem4 = GUICtrlCreateTabItem("Tab 4")
	GUICtrlSetState(-1,$GUI_SHOW)
	$Button4 = GUICtrlCreateButton("Button4", 405, 25, 80)
	$iMemo4 = GUICtrlCreateEdit("", 0, 25, 400, 275)
	GUICtrlSetFont($iMemo4, 9, 400, 0, "Courier New")
	GUICtrlSetBkColor(-1, 0xDDFFCC)
	GUICtrlSetColor(-1, 0xFFDAB9)
	GUISetState()	
	GUICtrlCreateTabItem("")


EndFunc

While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit

	EndSwitch
WEnd
 
Автор
M

maddoc

Новичок
Сообщения
48
Репутация
2
с меня магарыч ))
 
Верх