Hi leute, guckt euch das mal an...ich will bei dem auslesen nur werte 1 und 0 haben, weil mit 1,4 oder gar keinen wert kann ich nciht arbeiten, geht das irgendwie?
Spoiler anzeigen
#include <GUIConstants.au3>
$Form2 = GUICreate("Tabbed Notebook Dialog", 397, 201, 303, 219)
GUISetIcon("D:\005.ico")
$PageControl1 = GUICtrlCreateTab(0, 0, 396, 200)
GUICtrlSetResizing(-1, $GUI_DOCKWIDTH+$GUI_DOCKHEIGHT)
$TabSheet1 = GUICtrlCreateTabItem("Alhohol Sorten")
$Group1 = GUICtrlCreateGroup("Alk- je 1 Minute", 4, 25, 129, 169)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Zwergenbier = GUICtrlCreateCheckbox("Zwergenbier", 12, 169, 113, 17)
$Jaegerbier = GUICtrlCreateCheckbox("Jägerbier", 12, 89, 113, 17)
$Reiswein = GUICtrlCreateCheckbox("Reiswein", 12, 121, 113, 17)
$Hexensud = GUICtrlCreateCheckbox("Hexensud", 12, 73, 113, 17)
$Absinth = GUICtrlCreateCheckbox("Absinth", 12, 41, 113, 17)
$Eierflip = GUICtrlCreateCheckbox("Eierflip", 12, 57, 113, 17)
$WacholderbeerGin = GUICtrlCreateCheckbox("Wacholderbeer-Gin", 12, 153, 113, 17)
$VaabiWein = GUICtrlCreateCheckbox("Vaabi-Wein", 12, 137, 113, 17)
$Kleeblattbier = GUICtrlCreateCheckbox("Kleeblattbier", 12, 105, 113, 17)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group2 = GUICtrlCreateGroup("Alk- 3 Minuten", 132, 25, 129, 57)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Feuerwasser = GUICtrlCreateCheckbox("Feuerwasser", 140, 57, 81, 17)
$Eierlikoer = GUICtrlCreateCheckbox("Eierlikör", 140, 41, 81, 17)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group3 = GUICtrlCreateGroup("Alk- 5 Minuten", 260, 25, 129, 57)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$AltesZwergenbier = GUICtrlCreateCheckbox("Altes-Zwergenbier", 268, 41, 105, 17)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Start = GUICtrlCreateButton("Start", 136, 168, 249, 25, 0)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$passwort = GUICtrlCreateInput("", 136, 144, 249, 22)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$TabSheet2 = GUICtrlCreateTabItem("Hilfe")
GUICtrlCreateTabItem("")
GUISetState(@SW_SHOW)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
case $Start
_Start()
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
Func _Start()
$Absinth = GUICtrlRead($Absinth)
$Eierflip = GUICtrlRead($Eierflip)
$Hexensud = GUICtrlRead($Hexensud)
$Jaegerbier = GUICtrlRead($Jaegerbier)
$Kleeblattbier = GUICtrlRead($Kleeblattbier)
$Reiswein = GUICtrlRead($Reiswein)
$VaabiWein = GUICtrlRead($VaabiWein)
$WacholderbeerGin = GUICtrlRead($WacholderbeerGin)
$Zwergenbier = GUICtrlRead($Zwergenbier)
MsgBox("","",$Absinth)
MsgBox("","",$Eierflip)
MsgBox("","",$Hexensud)
MsgBox("","",$Jaegerbier)
MsgBox("","",$Kleeblattbier)
MsgBox("","",$Reiswein)
MsgBox("","",$VaabiWein)
MsgBox("","",$WacholderbeerGin)
MsgBox("","",$Zwergenbier)
EndFunc