überprüfen ob ein tabsheet offen ist

07/31/2010 21:10 omer36#1
also kurz gesagt:

ich habe mehrere tabsheet´s und würde gerne wissen, wie manns überprüft, welches grade "an" ist...


hab schon neweile gesucht, aber nix brauchbares gefunden...

mfg
07/31/2010 21:30 bassbanane#2
Wäre praktisch wenn du uns sagst welches Programm du meinst.
Es gibt tausende Programme die Tabs haben.
07/31/2010 21:36 omer36#3
hmm... mal überlegen...
wir sind hier im autoit bereich...

hmmm....


€nochmal ausfürhlicher

hab 3-4tabsheets, und in jedem ist eine edit...noch dazu ein button.
jenach welches tabsheet offen ist, soll die edit in dem offenen sheet geleert werden..
07/31/2010 21:46 bassbanane#4
Schau dir mal den Befehl _GUICtrlTab_GetCurSel an ;)
08/01/2010 21:19 suiluJ.#5
Entweder:
Oder:
[Only registered and activated users can see links. Click Here To Register...]
08/01/2010 22:22 PenGuin :O#6
Quick 'n Dirty hier im "Direkt antworten":

Code:
#include <GUITab.au3>

Global $iTab = -1

AdlibRegister("_CheckTab", 20)

While Sleep(50)
WEnd

Func _CheckTab()
$iActTab = GUICtrlTab_GetCurSel($hGUI) ;GUI-Handle hier hin

If $iActTab <> $iTab Then
ConsoleWrite("Tab " & ($iActTab + 1) & @CRLF)
$iTab = $iActTab
EndFunc
Bei Fehler: Meldung posten, ich verbesser.
08/06/2010 19:03 omer36#7
hmm.. iwie kapier ich das nihct so wirklich :D
wie müsste es hier aussehen, währe nett, wenn mal einer das machen könnte...

also wenn zb tabsheet1 offen ist, und der button gedrückt wird, wird nur die edit1 geleert, wenn tabsheet2 offen ist, die edit2.. usw...

mfg
08/06/2010 19:29 | Moep |#8
Zwar nicht so exotisch wie die anderen Versuche, aber funktionsgähig...

Code:
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 293, 385, 192, 124)
$Tab1 = GUICtrlCreateTab(4, 4, 277, 281)
GUICtrlSetResizing(-1, $GUI_DOCKWIDTH + $GUI_DOCKHEIGHT)
$TabSheet1 = GUICtrlCreateTabItem("TabSheet1")
$Edit1 = GUICtrlCreateEdit("", 12, 44, 265, 233)
GUICtrlSetData(-1, "Edit1")
$TabSheet2 = GUICtrlCreateTabItem("TabSheet2")
$Edit2 = GUICtrlCreateEdit("", 8, 40, 269, 241)
GUICtrlSetData(-1, "Edit2")
$TabSheet3 = GUICtrlCreateTabItem("TabSheet3")
$Edit3 = GUICtrlCreateEdit("", 12, 36, 261, 245)
GUICtrlSetData(-1, "Edit3")
$TabSheet4 = GUICtrlCreateTabItem("TabSheet4")
$Edit4 = GUICtrlCreateEdit("", 16, 52, 249, 229)
GUICtrlSetData(-1, "Edit4")
GUICtrlCreateTabItem("")
$Button1 = GUICtrlCreateButton("löschen", 44, 296, 129, 65, $WS_GROUP)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
		Case $Button1
			Switch GUICtrlRead($Tab1)
				Case 0
					GUICtrlSetData($Edit1, "")
				Case 1
					GUICtrlSetData($Edit2, "")
				Case 2
					GUICtrlSetData($Edit3, "")
				Case 3
					GUICtrlSetData($Edit4, "")
			EndSwitch
	EndSwitch
WEnd
Edit, hab mal noch die überflüssigen includes entfernt, war ja nicht mit anzusehen ;)
08/06/2010 19:51 omer36#9
danke danke, genau sowas wollte ich ^^