Hi,
hab eine kleine GUI wo man 3 Checkboxen anwählen kann. Ich brings einfach nicht fertig, dass nur eine der 3 Boxen gewählt werden darf.
[autoit];Gibt es R;S;T -> frage nach wie wir uns verbinden sollen
If $dsr = "READY" And $dss = "READY" And $dst = "READY" Then
; GUI alle Laufwerke schon gemappt
Opt("GUIOnEventMode", 1)
$Form1_1 = GUICreate("PC 2 MC", 326, 216, 293, 225)
$Group1 = GUICtrlCreateGroup("Die erlaubten Laufwerke sind schon verbunden", 0, 0, 321, 209)
$Label1 = GUICtrlCreateLabel("Bitte mindestens ein Laufwerk auswählen, das getrennt werden kann.", 32, 24, 275, 34)
$Buttonok = GUICtrlCreateButton("OK", 72, 160, 75, 25, 0)
$Buttonab = GUICtrlCreateButton("Abbrechen", 160, 160, 75, 25, 0)
$Label2 = GUICtrlCreateLabel("Welches Laufwerk soll getrennt werden??", 32, 140, 203, 17)
$CheckboxR = GUICtrlCreateCheckbox("", 32, 64, 17, 17)
$CheckboxS = GUICtrlCreateCheckbox("", 32, 88, 17, 17)
$CheckboxT = GUICtrlCreateCheckbox("", 32, 112, 17, 17)
$Label3 = GUICtrlCreateLabel("", 56, 64, 260, 17)
$Label4 = GUICtrlCreateLabel("", 56, 88, 260, 17)
$Label5 = GUICtrlCreateLabel("", 56, 112, 260, 17)
$Label6 = GUICtrlCreateLabel("R:", 8, 64, 17, 17)
$Label7 = GUICtrlCreateLabel("S:", 8, 88, 17, 17)
$Label8 = GUICtrlCreateLabel("T:", 8, 112, 17, 17)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUICtrlSetData($Label3, $uncR[0])
GUICtrlSetData($Label4, $uncS[0])
GUICtrlSetData($Label5, $uncT[0])
GUISetState()
;GUI Funkionen
GUICtrlSetOnEvent($Buttonok, "Create")
GUICtrlSetOnEvent($Buttonab, "CLOSEClicked")
GUISetOnEvent($GUI_EVENT_CLOSE, "CLOSEClicked")
While 1
Sleep(100)
WEnd
EndIf
Func create()
$ausgabe1 = $CheckboxR And BitAND(GUICtrlRead($CheckboxR), $GUI_CHECKED) = $GUI_CHECKED
$ausgabe2 = $CheckboxS And BitAND(GUICtrlRead($CheckboxS), $GUI_CHECKED) = $GUI_CHECKED
$ausgabe3 = $CheckboxT And BitAND(GUICtrlRead($CheckboxT), $GUI_CHECKED) = $GUI_CHECKED
If $ausgabe1 = 1 Then
DriveMapDel("R:")
Sleep(5000)
DriveMapAdd("R:", $SHARE & $ESPlatz, 0, "USER", "PW")
Run("c:\WINDOWS\explorer.exe R:\")
Exit
ElseIf $ausgabe2 = 1 Then
DriveMapDel("S:")
Sleep(5000)
DriveMapAdd("S:", $SHARE & $ESPlatz, 0, "USER", "PW")
Run("c:\WINDOWS\explorer.exe S:\")
Exit
ElseIf $ausgabe3 = 1 Then
DriveMapDel("T:")
Sleep(5000)
DriveMapAdd("T:", $SHARE & $ESPlatz, 0, "USER", "PW")
Run("c:\WINDOWS\explorer.exe T:\")
Exit
Else
MsgBox(0, "", "es wurde nichts ausgewählt!")
EndIf
GUISetState(@SW_HIDE)
EndFunc ;==>create
[/autoit][autoit][/autoit][autoit][/autoit][autoit]Exit
[/autoit][autoit][/autoit][autoit]Func CLOSEClicked()
Exit
EndFunc ;==>CLOSEClicked
Bis jetzt bin ich ganz dolle stolz, dass es soweit funktioniert... es könnte aber sein, dass jemand 2 Chckboxen auswählt und dann geht es nicht mehr.. Jemand eine Idee???
Gruss Neurobert