hab hier 2 schleifen ineinander verschachtelt. Das Program Funkioniert soweit, das Problem ist, das der Button STOK bzw das Fenster Event close nur unregelmässig gehen. Ab und zu geht es beim ersten mal, manchmal muss ich 10 mal draufdrücken.
Iregendwelche ideen?
Spoiler anzeigen
While 1
$msg = GUIGetMsg()
if $msg = $GUI_event_close Then
Exit
EndIf
Select
Case @error = 1
Exit
Case $msg = $CANCEL
_RunDos("net use z: /delete ")
Exit
Case $msg = $SAVE
Case $msg = $STATUS
Case $msg = $LADEN
; Create GUI
#Region ### START Koda GUI section ### Form=c:\daten\script\user_laden_gui.kxf
$SERVER = GUICreate("SERVER", 223, 61, 193, 115)
$STOK = GUICtrlCreateButton("OK", 144, 32, 75, 25, 0)
$Combo = GUICtrlCreateCombo("", 8, 8, 209, 100)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
; Add files
_GUICtrlComboBox_BeginUpdate ($Combo)
_GUICtrlComboBox_AddDir ($Combo, $PFADAKTUELL & "n2nSA\db\*",$DDL_DIRECTORY, True)
_GUICtrlComboBox_EndUpdate ($Combo)
$status = 0
; Loop until user exits
Do
If GUIGetMsg() = $GUI_EVENT_CLOSE Then
$status = 1
EndIf
If GUIGetMsg() = $STOK Then
MsgBox(0,"","test " & _GUICtrlComboBox_GetEditText ($Combo))
EndIf
Until $status=1
GUIDelete()
EndSelect
Wend
Edit BugFix: Bitte Tags benutzen