Hey all
ich mal wieder mit nem Anfängerproblem.
Hab mir ne GUI erstellt mit einem ReiterMenü (GUIctrlcreateTab). Pro Tab sind dann 6-10 Buttons, die verschiedene Funktionen starten sollen.
Aber wenn ich auf nen Button klick passiert überhaupt nichts. Woran liegts??
Spoiler anzeigen
#include
#include
Opt('MustDeclareVars', 1)
[/autoit] [autoit][/autoit] [autoit]Local $tab, $msg, $nr
Local $font = "Lucida Console"
Local $font1 = "Comic Sans MS"
Local $ini = @ScriptDir&"/inifile.ini"
Local $tab1, $tab1alias, $tab1titel, $btn11, $btn12, $btn13, $btn14, $btn15, $btn16, $btn17, $btn18, $btn1
Local $tab2, $tab2alias, $tab2titel, $btn21, $btn22, $btn23, $btn24, $btn25, $btn26, $btn27, $btn28, $btn2
Local $tab3, $tab3alias, $tab3titel, $btn31, $btn32, $btn33, $btn34, $btn35, $btn36, $btn37, $btn38, $btn3
Local $tab4, $tab4alias, $tab4titel, $btn41, $btn42, $btn43, $btn44, $btn45, $btn46, $btn47, $btn48, $btn4
Local $tab5, $tab5alias, $tab5titel, $btn51, $btn52, $btn53, $btn54, $btn55, $btn56, $btn57, $btn58, $btn5
Local $tab6, $tab6alias, $tab6titel, $btn61, $btn62, $btn63, $btn64, $btn65, $btn66, $btn67, $btn68, $btn6
Local $tab7, $tab7alias, $tab7titel, $btn71, $btn72, $btn73, $btn74, $btn75, $btn76, $btn77, $btn78, $btn7
Local $tab8, $tab8alias, $tab8titel, $btn81, $btn82, $btn83, $btn84, $btn85, $btn86, $btn87, $btn88, $btn8
Local $titel = "Dedicated Server Control 3"
Local $BGMain = 0x00E0FFFF
Local $von_oben_1 = 80
Local $rand_links_1 = 15
Local $von_oben_2 = $von_oben_1 + 15
Local $rand_links_2 = $rand_links_1 + 20
$tab1titel=IniRead($ini,"basic","reiter1","Name?")
$tab2titel=IniRead($ini,"basic","reiter2","Name?")
$tab3titel=IniRead($ini,"basic","reiter3","Name?")
$tab4titel=IniRead($ini,"basic","reiter4","Name?")
$tab5titel=IniRead($ini,"basic","reiter5","Name?")
$tab6titel=IniRead($ini,"basic","reiter6","Name?")
$tab7titel=IniRead($ini,"basic","reiter7","Name?")
$tab8titel=IniRead($ini,"basic","reiter8","Name?")
$tab1alias=IniRead($ini,"basic","reiter1alias","Name?")
$tab2alias=IniRead($ini,"basic","reiter2alias","Name?")
$tab3alias=IniRead($ini,"basic","reiter3alias","Name?")
$tab4alias=IniRead($ini,"basic","reiter4alias","Name?")
$tab5alias=IniRead($ini,"basic","reiter5alias","Name?")
$tab6alias=IniRead($ini,"basic","reiter6alias","Name?")
$tab7alias=IniRead($ini,"basic","reiter7alias","Name?")
$tab8alias=IniRead($ini,"basic","reiter8alias","Name?")
GUICreate($titel, 800, 600)
GUISetBkColor($BGMain)
GUISetFont(9, 400)
$tab = GUICtrlCreateTab($rand_links_1, 80, 771, 480,$TCS_FIXEDWIDTH)
$tab1 = GUICtrlCreateTabItem($tab1titel)
GUISetFont(30, 400, 4, $font1)
GUICtrlCreateLabel($tab1alias,180,10)
GUISetFont(10, 400,0,$font)
$btn1 = GUICtrlCreateButton ("OK0", $rand_links_2, $von_oben_2 + 50, 100, 25)
GUICtrlSetOnEvent($btn1,"func1")
$tab2 = GUICtrlCreateTabItem($tab2titel)
GUISetFont(30, 400, 4, $font1)
GUICtrlCreateLabel($tab2alias,180,10)
GUISetFont(10, 400,0,$font)
$btn2 = GUICtrlCreateButton ("OK0", $rand_links_2, $von_oben_2 + 50, 100, 25)
GUICtrlSetOnEvent($btn2,"func2")
Func func1()
MsgBox(0,"","reiter eins funzt")
EndFunc
Func func2()
MsgBox(0,"","reiter zwei funzt")
EndFunc
GUISetState()
[/autoit] [autoit][/autoit] [autoit]While 1
$msg = GUIGetMsg()
If $msg = $GUI_EVENT_CLOSE Then ExitLoop
WEnd
