Habe ein kleinen Tipp
Mach das ganze mal so wie unten in der quel code
das ist glaube ich besser da braucht man die 1000 dateien nicht
und das ganz läuft im hintergrund
Mit F2 kannste pogramm beenden
mit f3 denn laufwerk öffnen
mit f4 schließen
Quel Code
Spoiler anzeigen
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_outfile=CDLade0.1.exe
#AutoIt3Wrapper_Res_Fileversion=0.1.0.1
#AutoIt3Wrapper_Res_Fileversion_AutoIncrement=y
#AutoIt3Wrapper_Res_LegalCopyright=Jeahaha
#AutoIt3Wrapper_Res_Language=1031
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
$file999 = "settings.properties"
If FileExists($file999) Then
$lwe = IniRead ($file999, "LW", "LW","")
HotKeySet("{F3}", "F3")
HotKeySet("{F4}", "F4")
HotKeySet("{F2}", "F2")
GUISetState(@SW_SHOW)
Else
MsgBox(0,"","Bitte wählen sie ein laufwerk aus!!")
GUICreate ("Laufwerk auswahl" ,310 ,180)
GUICtrlCreateLabel("Schreiben sie den laufwerk namen zumbeispiel E:",0, 30)
$laufwerk999 = GUICtrlCreateInput("", 0, 50, 300, 20)
$Speichern999 = GUICtrlCreateButton("Speichern", 120, 130,80,50)
Opt( "GUIOnEventMode", 1 )
GUICtrlSetOnEvent( $Speichern999,"Speichern999")
GUISetState ()
EndIf
Func Speichern999()
$laufwerk999read = GUICtrlRead($laufwerk999)
IniWrite($file999,"LW","LW",$laufwerk999read)
Sleep(1000)
Exit
EndFunc
Func F2()
Exit
EndFunc
Func F3()
CDTray($lwe,"open")
EndFunc
Func F4()
[/autoit] [autoit][/autoit] [autoit]CDTray($lwe,"close")
[/autoit] [autoit][/autoit] [autoit]EndFunc
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]While 1
WEnd
MFG
Ist nur ein tipp