Hi ,
Ich wollte euch heute einmal meinen Stundenplaner vorstellen.
Der Stundenplaner ist einer meiner ersten Script's die ich bisher geschrieben habe.
Ich würde mich über Feedback und verbesserungs Vorschläge
sehr freuen
Wenn ihr irgendwelche Bugs findet einfach bescheid sagen.
Danke im voraus
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
MsgBox(0,"Wilkommen", "Um den Stundenplan zu ändern einfach auf die Button's klicken !"& @CRLF & "WICHTIG ---> Das Komma musst du als Punkt schreiben ! (Nur bei den Extra Funktionen)" & @CRLF & "Bei den Extras wird immer auf 2 Komma stellen nach dem Komma gerundet !" )
[/autoit][autoit][/autoit][autoit][/autoit][autoit][/autoit][autoit]$Form1 = GUICreate("Stundenplan ", 785, 390, 588, 231)
$MenuItem1 = GUICtrlCreateMenu("Optionen")
$resetbutton = GUICtrlCreateMenuItem("Alle Button's löschen", $MenuItem1)
GUISetBkColor(0xC0C0C0)
$Label1 = GUICtrlCreateLabel("1 Stunde", 8, 48, 75, 28)
GUICtrlSetFont(-1, 13, 400, 0, "Comic Sans MS")
$Label2 = GUICtrlCreateLabel("2 Stunde", 8, 96, 77, 28)
GUICtrlSetFont(-1, 13, 400, 0, "Comic Sans MS")
$Label3 = GUICtrlCreateLabel("3 Stunde", 8, 144, 77, 28)
GUICtrlSetFont(-1, 13, 400, 0, "Comic Sans MS")
$Label4 = GUICtrlCreateLabel("4 Stunde", 8, 192, 77, 28)
GUICtrlSetFont(-1, 13, 400, 0, "Comic Sans MS")
$Label5 = GUICtrlCreateLabel("5 Stunde", 8, 240, 77, 28)
GUICtrlSetFont(-1, 13, 400, 0, "Comic Sans MS")
$Label6 = GUICtrlCreateLabel("6 Stunde", 8, 288, 77, 28)
GUICtrlSetFont(-1, 13, 400, 0, "Comic Sans MS")
$Label7 = GUICtrlCreateLabel("7 Stunde", 8, 336, 77, 28)
GUICtrlSetFont(-1, 13, 400, 0, "Comic Sans MS")
$Button1 = GUICtrlCreateButton("Keine Angabe", 104, 48, 99, 25, $WS_GROUP)
GUICtrlSetFont(-1, 10, 400, 0, "Comic Sans MS")
$Button2 = GUICtrlCreateButton("Keine Angabe", 216, 48, 99, 25, $WS_GROUP)
GUICtrlSetFont(-1, 10, 400, 0, "Comic Sans MS")
$Button3 = GUICtrlCreateButton("Keine Angabe", 328, 48, 99, 25, $WS_GROUP)
GUICtrlSetFont(-1, 10, 400, 0, "Comic Sans MS")
$Button4 = GUICtrlCreateButton("Keine Angabe", 440, 48, 99, 25, $WS_GROUP)
GUICtrlSetFont(-1, 10, 400, 0, "Comic Sans MS")
$Button5 = GUICtrlCreateButton("Keine Angabe", 552, 48, 99, 25, $WS_GROUP)
GUICtrlSetFont(-1, 10, 400, 0, "Comic Sans MS")
$Button6 = GUICtrlCreateButton("Keine Angabe", 104, 96, 99, 25, $WS_GROUP)
GUICtrlSetFont(-1, 10, 400, 0, "Comic Sans MS")
$Button7 = GUICtrlCreateButton("Keine Angabe", 216, 96, 99, 25, $WS_GROUP)
GUICtrlSetFont(-1, 10, 400, 0, "Comic Sans MS")
$Button8 = GUICtrlCreateButton("Keine Angabe", 328, 96, 99, 25, $WS_GROUP)
GUICtrlSetFont(-1, 10, 400, 0, "Comic Sans MS")
$Button9 = GUICtrlCreateButton("Keine Angabe", 440, 96, 99, 25, $WS_GROUP)
GUICtrlSetFont(-1, 10, 400, 0, "Comic Sans MS")
$Button10 = GUICtrlCreateButton("Keine Angabe", 552, 96, 99, 25, $WS_GROUP)
GUICtrlSetFont(-1, 10, 400, 0, "Comic Sans MS")
$Button11 = GUICtrlCreateButton("Keine Angabe", 104, 144, 99, 25, $WS_GROUP)
GUICtrlSetFont(-1, 10, 400, 0, "Comic Sans MS")
$Button12 = GUICtrlCreateButton("Keine Angabe", 216, 144, 99, 25, $WS_GROUP)
GUICtrlSetFont(-1, 10, 400, 0, "Comic Sans MS")
$Button13 = GUICtrlCreateButton("Keine Angabe", 328, 144, 99, 25, $WS_GROUP)
GUICtrlSetFont(-1, 10, 400, 0, "Comic Sans MS")
$Button14 = GUICtrlCreateButton("Keine Angabe", 440, 144, 99, 25, $WS_GROUP)
GUICtrlSetFont(-1, 10, 400, 0, "Comic Sans MS")
$Button15 = GUICtrlCreateButton("Keine Angabe", 552, 144, 99, 25, $WS_GROUP)
GUICtrlSetFont(-1, 10, 400, 0, "Comic Sans MS")
$Button16 = GUICtrlCreateButton("Keine Angabe", 104, 192, 99, 25, $WS_GROUP)
GUICtrlSetFont(-1, 10, 400, 0, "Comic Sans MS")
$Button17 = GUICtrlCreateButton("Keine Angabe", 216, 192, 99, 25, $WS_GROUP)
GUICtrlSetFont(-1, 10, 400, 0, "Comic Sans MS")
$Button18 = GUICtrlCreateButton("Keine Angabe", 328, 192, 99, 25, $WS_GROUP)
GUICtrlSetFont(-1, 10, 400, 0, "Comic Sans MS")
$Button19 = GUICtrlCreateButton("Keine Angabe", 440, 192, 99, 25, $WS_GROUP)
GUICtrlSetFont(-1, 10, 400, 0, "Comic Sans MS")
$Button20 = GUICtrlCreateButton("Keine Angabe", 552, 192, 99, 25, $WS_GROUP)
GUICtrlSetFont(-1, 10, 400, 0, "Comic Sans MS")
$Button21 = GUICtrlCreateButton("Keine Angabe", 104, 240, 99, 25, $WS_GROUP)
GUICtrlSetFont(-1, 10, 400, 0, "Comic Sans MS")
$Button22 = GUICtrlCreateButton("Keine Angabe", 216, 240, 99, 25, $WS_GROUP)
GUICtrlSetFont(-1, 10, 400, 0, "Comic Sans MS")
$Button23 = GUICtrlCreateButton("Keine Angabe", 328, 240, 99, 25, $WS_GROUP)
GUICtrlSetFont(-1, 10, 400, 0, "Comic Sans MS")
$Button24 = GUICtrlCreateButton("Keine Angabe", 440, 240, 99, 25, $WS_GROUP)
GUICtrlSetFont(-1, 10, 400, 0, "Comic Sans MS")
$Button25 = GUICtrlCreateButton("Keine Angabe", 552, 240, 99, 25, $WS_GROUP)
GUICtrlSetFont(-1, 10, 400, 0, "Comic Sans MS")
$Button26 = GUICtrlCreateButton("Keine Angabe", 104, 288, 99, 25, $WS_GROUP)
GUICtrlSetFont(-1, 10, 400, 0, "Comic Sans MS")
$Button27 = GUICtrlCreateButton("Keine Angabe", 216, 288, 99, 25, $WS_GROUP)
GUICtrlSetFont(-1, 10, 400, 0, "Comic Sans MS")
$Button28 = GUICtrlCreateButton("Keine Angabe", 328, 288, 99, 25, $WS_GROUP)
GUICtrlSetFont(-1, 10, 400, 0, "Comic Sans MS")
$Button29 = GUICtrlCreateButton("Keine Angabe", 440, 288, 99, 25, $WS_GROUP)
GUICtrlSetFont(-1, 10, 400, 0, "Comic Sans MS")
$Button30 = GUICtrlCreateButton("Keine Angabe", 552, 288, 99, 25, $WS_GROUP)
GUICtrlSetFont(-1, 10, 400, 0, "Comic Sans MS")
$Button31 = GUICtrlCreateButton("Keine Angabe", 104, 336, 99, 25, $WS_GROUP)
GUICtrlSetFont(-1, 10, 400, 0, "Comic Sans MS")
$Button32 = GUICtrlCreateButton("Keine Angabe", 216, 336, 99, 25, $WS_GROUP)
GUICtrlSetFont(-1, 10, 400, 0, "Comic Sans MS")
$Button33 = GUICtrlCreateButton("Keine Angabe", 328, 336, 99, 25, $WS_GROUP)
GUICtrlSetFont(-1, 10, 400, 0, "Comic Sans MS")
$Button34 = GUICtrlCreateButton("Keine Angabe", 440, 336, 99, 25, $WS_GROUP)
GUICtrlSetFont(-1, 10, 400, 0, "Comic Sans MS")
$Button35 = GUICtrlCreateButton("Keine Angabe", 552, 336, 99, 25, $WS_GROUP)
GUICtrlSetFont(-1, 10, 400, 0, "Comic Sans MS")
$Label8 = GUICtrlCreateLabel("Montag", 104, 8, 64, 28)
GUICtrlSetFont(-1, 13, 400, 0, "Comic Sans MS")
$Label9 = GUICtrlCreateLabel("Dienstag", 216, 8, 73, 28)
GUICtrlSetFont(-1, 13, 400, 0, "Comic Sans MS")
$Label10 = GUICtrlCreateLabel("Mittwoch", 328, 8, 80, 28)
GUICtrlSetFont(-1, 13, 400, 0, "Comic Sans MS")
$Label11 = GUICtrlCreateLabel("Donnerstag", 440, 8, 96, 28)
GUICtrlSetFont(-1, 13, 400, 0, "Comic Sans MS")
$Label12 = GUICtrlCreateLabel("Freitag", 552, 8, 62, 28)
GUICtrlSetFont(-1, 13, 400, 0, "Comic Sans MS")
$Label13 = GUICtrlCreateLabel("-----------------------------------------------------------------------------------------------------------------------------------------------------------------", 8, 128, 648, 12)
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
$Label14 = GUICtrlCreateLabel("-----------------------------------------------------------------------------------------------------------------------------------------------------------------", 7, 80, 648, 12)
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
$Label15 = GUICtrlCreateLabel("-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------", 5, 32, 768, 12)
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
$Label16 = GUICtrlCreateLabel("-----------------------------------------------------------------------------------------------------------------------------------------------------------------", 7, 170, 648, 12)
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
$Label17 = GUICtrlCreateLabel("-----------------------------------------------------------------------------------------------------------------------------------------------------------------", 3, 223, 648, 12)
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
$Label18 = GUICtrlCreateLabel("-----------------------------------------------------------------------------------------------------------------------------------------------------------------", 3, 265, 648, 12)
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
$Label19 = GUICtrlCreateLabel("-----------------------------------------------------------------------------------------------------------------------------------------------------------------", 2, 314, 648, 12)
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
$Label20 = GUICtrlCreateLabel("By Nono", 728, 336, 47, 19)
GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS")
$Label21 = GUICtrlCreateLabel(" ", 8, 8, 88, 19)
GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS")
$Button36 = GUICtrlCreateButton("Quadrierer", 661, 46, 115, 25, $WS_GROUP)
GUICtrlSetFont(-1, 10, 400, 0, "Comic Sans MS")
$Button37 = GUICtrlCreateButton("Wurzel Rechner", 661, 94, 115, 25, $WS_GROUP)
GUICtrlSetFont(-1, 10, 400, 0, "Comic Sans MS")
$Button38 = GUICtrlCreateButton("Addition", 661, 142, 115, 25, $WS_GROUP)
GUICtrlSetFont(-1, 10, 400, 0, "Comic Sans MS")
$Button39 = GUICtrlCreateButton("Subtraktion", 661, 190, 115, 25, $WS_GROUP)
GUICtrlSetFont(-1, 10, 400, 0, "Comic Sans MS")
$Button40 = GUICtrlCreateButton("Multiplikation", 661, 238, 115, 25, $WS_GROUP)
GUICtrlSetFont(-1, 10, 400, 0, "Comic Sans MS")
$Button41 = GUICtrlCreateButton("Division", 661, 286, 115, 25, $WS_GROUP)
GUICtrlSetFont(-1, 10, 400, 0, "Comic Sans MS")
$Label22 = GUICtrlCreateLabel("Extras", 664, 8, 58, 28)
GUICtrlSetFont(-1, 13, 400, 0, "Comic Sans MS")
GUISetState(@SW_SHOW)
AdlibRegister("thetime", 100)
;EXTRAS====================================================================
;EXTRAS ENDE==================================================================================
[/autoit][autoit][/autoit][autoit]$INI = IniRead("stunden.ini","zeile1","stunden", "")
GUICtrlSetData($Button1, $INI)
;===============================================================
$INI2 = IniRead("stunden.ini","zeile2","stunden", "")
GUICtrlSetData($Button2, $INI2)
;==========================================================
$INI3 = IniRead("stunden.ini","zeile3","stunden", "")
GUICtrlSetData($Button3, $INI3)
;=============================================================
$INI4 = IniRead("stunden.ini","zeile4","stunden", "")
GUICtrlSetData($Button4, $INI4)
;=============================================================
$INI5 = IniRead("stunden.ini","zeile5","stunden", "")
GUICtrlSetData($Button5, $INI5)
;=============================================================
$INI6 = IniRead("stunden.ini","zeile6","stunden", "")
GUICtrlSetData($Button6, $INI6)
;=====================================================
$INI7 = IniRead("stunden.ini","zeile7","stunden", "")
GUICtrlSetData($Button7, $INI7)
;===============================================================
$INI8 = IniRead("stunden.ini","zeile8","stunden", "")
GUICtrlSetData($Button8, $INI8)
;==============================================================
$INI9 = IniRead("stunden.ini","zeile9","stunden", "")
GUICtrlSetData($Button9, $INI9)
;===============================================================
$INI10 = IniRead("stunden.ini","zeile10","stunden", "")
GUICtrlSetData($Button10, $INI10)
;==========================================================
$INI11 = IniRead("stunden.ini","zeile11","stunden", "")
GUICtrlSetData($Button11, $INI11)
;==============================================================
$INI12 = IniRead("stunden.ini","zeile12","stunden", "")
GUICtrlSetData($Button12, $INI12)
;==========================================================
$INI13 = IniRead("stunden.ini","zeile13","stunden", "")
GUICtrlSetData($Button13, $INI13)
;====================================================
$INI14 = IniRead("stunden.ini","zeile14","stunden", "")
GUICtrlSetData($Button14, $INI14)
;==========================================================
$INI15 = IniRead("stunden.ini","zeile15","stunden", "")
GUICtrlSetData($Button15, $INI15)
;===============================================================
$INI16 = IniRead("stunden.ini","zeile16","stunden", "")
GUICtrlSetData($Button16, $INI16)
;===============================================================
$INI17 = IniRead("stunden.ini","zeile17","stunden", "")
GUICtrlSetData($Button17, $INI17)
;===============================================================
$INI18 = IniRead("stunden.ini","zeile18","stunden", "")
GUICtrlSetData($Button18, $INI18)
;===============================================================
$INI19 = IniRead("stunden.ini","zeile19","stunden", "")
GUICtrlSetData($Button19, $INI19)
;===============================================================
$INI20 = IniRead("stunden.ini","zeile20","stunden", "")
GUICtrlSetData($Button20, $INI20)
;==================================================================
$INI21 = IniRead("stunden.ini","zeile21","stunden", "")
GUICtrlSetData($Button21, $INI21)
;===============================================================
$INI22 = IniRead("stunden.ini","zeile22","stunden", "")
GUICtrlSetData($Button22, $INI22)
;===============================================================
$INI23 = IniRead("stunden.ini","zeile23","stunden", "")
GUICtrlSetData($Button23, $INI23)
;===============================================================
$INI24 = IniRead("stunden.ini","zeile24","stunden", "")
GUICtrlSetData($Button24, $INI24)
;===============================================================
$INI25 = IniRead("stunden.ini","zeile25","stunden", "")
GUICtrlSetData($Button25, $INI25)
;===============================================================
$INI26 = IniRead("stunden.ini","zeile26","stunden", "")
GUICtrlSetData($Button26, $INI26)
;===============================================================
$INI27 = IniRead("stunden.ini","zeile27","stunden", "")
GUICtrlSetData($Button27, $INI27)
;===============================================================
$INI28 = IniRead("stunden.ini","zeile28","stunden", "")
GUICtrlSetData($Button28, $INI28)
;===============================================================
$INI29 = IniRead("stunden.ini","zeile29","stunden", "")
GUICtrlSetData($Button29, $INI29)
;==============================================================
$INI30 = IniRead("stunden.ini","zeile30","stunden", "")
GUICtrlSetData($Button30, $INI30)
;===============================================================
$INI31 = IniRead("stunden.ini","zeile31","stunden", "")
GUICtrlSetData($Button31, $INI31)
;===============================================================
$INI32= IniRead("stunden.ini","zeile32","stunden", "")
GUICtrlSetData($Button32, $INI32)
;===============================================================
$INI33 = IniRead("stunden.ini","zeile33","stunden", "")
GUICtrlSetData($Button33, $INI33)
;===============================================================
$INI34 = IniRead("stunden.ini","zeile34","stunden", "")
GUICtrlSetData($Button34, $INI34)
;===============================================================
$INI35 = IniRead("stunden.ini","zeile35","stunden", "")
GUICtrlSetData($Button35, $INI35)
;==================================================================
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Func thetime()
GUICtrlSetData ($label21, @HOUR & ":" & @MIN & ":" & @SEC)
EndFunc
;BUTTONRESET=================================================================
Case $resetbutton
FileDelete("stunden.ini")
MsgBox(0,"Wichtig","Damit die Änderungen übernehmt werden das Programm neustarten !")
;==================================================================================BUTTONRESET ENDE
Case $Button36
$sZahl = InputBox("Zahl", "Bitte geben Sie die gewünschte Zahl ein die Sie Quadrieren möchten und drücken sie auf Ok.")
If @error Then
MsgBox(0,"Fehler", "Sie haben auf Abbrechen geklickt.") ;QUADRIEIER
EndIf
$rechnung = $sZahl * $sZahl
$sround = Round($rechnung, 2)
MsgBox(0,"Ergebnis", "Ihr Ergebnis lautet: " & $sround)
;====================================================================================
Case $Button37
$swurzel = InputBox("Wurzelrechner","Bitte gebe die Quadratwurzel an !" )
If @error Then
MsgBox(0,"Fehler", "Sie haben auf Abbrechen geklickt.") ;WURZELRECHNER
EndIf
$wurzelergebnis = Sqrt($swurzel)
$gerundet = Round($wurzelergebnis, 2)
MsgBox(0,"Ergebnis","Ihr Ergebnis lautet: " & $gerundet)
;================================================================================
Case $Button38
$Saddition1 = InputBox("Addition","Gebe die 1 Zahl an !")
If @error Then
MsgBox(0,"Fehler", "Sie haben auf Abbrechen geklickt.") ;ADDITION
EndIf
$Saddition2 = InputBox("Addition","Gebe die 2 Zahl an !")
If @error Then
MsgBox(0,"Fehler", "Sie haben auf Abbrechen geklickt.")
EndIf
$additionergebnis = $Saddition1 + $Saddition2
$additionrundet = Round($additionergebnis, 2)
MsgBox(0,"Ergebnis","Ihr Ergebnis lautet: " & $additionrundet)
;================================================================================
Case $Button39
$sub1 = InputBox("Subtraktion","Gebe die 1 Zahl an !")
If @error Then
MsgBox(0,"Fehler", "Sie haben auf Abbrechen geklickt.")
EndIf
$sub2 = InputBox("Subtraktion","Gebe die 2 zahl an !") ;SUBTRAKTION
If @error Then
MsgBox(0,"Fehler", "Sie haben auf Abbrechen geklickt.")
EndIf
$subergebnis = $sub1 - $sub2
$subrundet = Round($subergebnis, 2)
MsgBox(0,"Ergebnis","Ihr Ergebnis lautet: " & $subrundet)
;===================================================================================
Case $Button41
$divi1 = InputBox("Division","Gebe die 1 Zahl an !")
If @error Then
MsgBox(0,"Fehler", "Sie haben auf Abbrechen geklickt.")
EndIf
$divi2 = InputBox("Division","Gebe die 2 zahl an !") ;DIVISION
If @error Then
MsgBox(0,"Fehler", "Sie haben auf Abbrechen geklickt.")
EndIf
$diviergebnis = $divi1 / $divi2
$divirundet = Round($diviergebnis, 2)
MsgBox(0,"Ergebnis","Ihr Ergebnis lautet: " & $divirundet)
;===============================================================================
Case $Button40
$multi1 = InputBox("Multiplikation","Gebe die 1 Zahl an !")
If @error Then
MsgBox(0,"Fehler", "Sie haben auf Abbrechen geklickt.")
EndIf
$multi2 = InputBox("Multiplikation","Gebe die 2 zahl an !") ;DIVISION
If @error Then
MsgBox(0,"Fehler", "Sie haben auf Abbrechen geklickt.")
EndIf
$multiergebnis = $multi1 * $multi2
$multirundet = Round($multiergebnis, 2)
MsgBox(0,"Ergebnis","Ihr Ergebnis lautet: " & $multirundet)
Case $Button1
$sdata = InputBox("Angabe","Bitte gebe ein Fach an !")
GUICtrlRead($sdata)
GUICtrlSetData($Button1, $sdata)
IniWrite("stunden.ini","zeile1","stunden",$sdata)
Case $Button2
$sdata2 = InputBox("Angabe","Bitte gebe ein Fach an !")
GUICtrlRead($sdata2)
GUICtrlSetData($Button2, $sdata2)
IniWrite("stunden.ini","zeile2","stunden",$sdata2)
Case $Button3
$sdata3 = InputBox("Angabe","Bitte gebe ein Fach an !")
GUICtrlRead($sdata3)
GUICtrlSetData($Button3, $sdata3)
IniWrite("stunden.ini","zeile3","stunden",$sdata3)
Case $Button4
$sdata4 = InputBox("Angabe","Bitte gebe ein Fach an !")
GUICtrlRead($sdata4)
GUICtrlSetData($Button4, $sdata4)
IniWrite("stunden.ini","zeile4","stunden",$sdata4)
Case $Button5
$sdata5 = InputBox("Angabe","Bitte gebe ein Fach an !")
GUICtrlRead($sdata5)
GUICtrlSetData($Button5, $sdata5)
IniWrite("stunden.ini","zeile5","stunden",$sdata5)
Case $Button6
$sdata6 = InputBox("Angabe","Bitte gebe ein Fach an !")
GUICtrlRead($sdata6)
GUICtrlSetData($Button6, $sdata6)
IniWrite("stunden.ini","zeile6","stunden",$sdata6)
Case $Button7
$sdata7 = InputBox("Angabe","Bitte gebe ein Fach an !")
GUICtrlRead($sdata7)
GUICtrlSetData($Button7, $sdata7)
IniWrite("stunden.ini","zeile7","stunden",$sdata7)
Case $Button8
$sdata8 = InputBox("Angabe","Bitte gebe ein Fach an !")
GUICtrlRead($sdata8)
GUICtrlSetData($Button8, $sdata8)
IniWrite("stunden.ini","zeile8","stunden",$sdata8)
Case $Button9
$sdata9 = InputBox("Angabe","Bitte gebe ein Fach an !")
GUICtrlRead($sdata9)
GUICtrlSetData($Button9, $sdata9)
IniWrite("stunden.ini","zeile9","stunden",$sdata9)
Case $Button10
$sdata10 = InputBox("Angabe","Bitte gebe ein Fach an !")
GUICtrlRead($sdata10)
GUICtrlSetData($Button10, $sdata10)
IniWrite("stunden.ini","zeile10","stunden",$sdata10)
Case $Button11
$sdata11 = InputBox("Angabe","Bitte gebe ein Fach an !")
GUICtrlRead($sdata11)
GUICtrlSetData($Button11, $sdata11)
IniWrite("stunden.ini","zeile11","stunden",$sdata11)
Case $Button12
$sdata12 = InputBox("Angabe","Bitte gebe ein Fach an !")
GUICtrlRead($sdata12)
GUICtrlSetData($Button12, $sdata12)
IniWrite("stunden.ini","zeile12","stunden",$sdata12)
Case $Button13
$sdata13 = InputBox("Angabe","Bitte gebe ein Fach an !")
GUICtrlRead($sdata13)
GUICtrlSetData($Button13, $sdata13)
IniWrite("stunden.ini","zeile13","stunden",$sdata13)
Case $Button14
$sdata14= InputBox("Angabe","Bitte gebe ein Fach an !")
GUICtrlRead($sdata14)
GUICtrlSetData($Button14, $sdata14)
IniWrite("stunden.ini","zeile14","stunden",$sdata14)
Case $Button15
$sdata15 = InputBox("Angabe","Bitte gebe ein Fach an !")
GUICtrlRead($sdata15)
GUICtrlSetData($Button15, $sdata15)
IniWrite("stunden.ini","zeile15","stunden",$sdata15)
Case $Button16
$sdata16 = InputBox("Angabe","Bitte gebe ein Fach an !")
GUICtrlRead($sdata16)
GUICtrlSetData($Button16, $sdata16)
IniWrite("stunden.ini","zeile16","stunden",$sdata16)
Case $Button17
$sdata17 = InputBox("Angabe","Bitte gebe ein Fach an !")
GUICtrlRead($sdata17)
GUICtrlSetData($Button17, $sdata17)
IniWrite("stunden.ini","zeile17","stunden",$sdata17)
Case $Button18
$sdata18 = InputBox("Angabe","Bitte gebe ein Fach an !")
GUICtrlRead($sdata18)
GUICtrlSetData($Button18, $sdata18)
IniWrite("stunden.ini","zeile18","stunden",$sdata18)
Case $Button19
$sdata19 = InputBox("Angabe","Bitte gebe ein Fach an !")
GUICtrlRead($sdata19)
GUICtrlSetData($Button19, $sdata19)
IniWrite("stunden.ini","zeile19","stunden",$sdata19)
Case $Button20
$sdata20 = InputBox("Angabe","Bitte gebe ein Fach an !")
GUICtrlRead($sdata20)
GUICtrlSetData($Button20, $sdata20)
IniWrite("stunden.ini","zeile20","stunden",$sdata20)
Case $Button21
$sdata21 = InputBox("Angabe","Bitte gebe ein Fach an !")
GUICtrlRead($sdata21)
GUICtrlSetData($Button21, $sdata21)
IniWrite("stunden.ini","zeile21","stunden",$sdata21)
Case $Button22
$sdata22 = InputBox("Angabe","Bitte gebe ein Fach an !")
GUICtrlRead($sdata22)
GUICtrlSetData($Button22, $sdata22)
IniWrite("stunden.ini","zeile22","stunden",$sdata22)
Case $Button23
$sdata23 = InputBox("Angabe","Bitte gebe ein Fach an !")
GUICtrlRead($sdata23)
GUICtrlSetData($Button23, $sdata23)
IniWrite("stunden.ini","zeile23","stunden",$sdata23)
Case $Button24
$sdata24 = InputBox("Angabe","Bitte gebe ein Fach an !")
GUICtrlRead($sdata24)
GUICtrlSetData($Button24, $sdata24)
IniWrite("stunden.ini","zeile24","stunden",$sdata24)
Case $Button25
$sdata25 = InputBox("Angabe","Bitte gebe ein Fach an !")
GUICtrlRead($sdata25)
GUICtrlSetData($Button25, $sdata25)
IniWrite("stunden.ini","zeile25","stunden",$sdata25)
Case $Button26
$sdata26 = InputBox("Angabe","Bitte gebe ein Fach an !")
GUICtrlRead($sdata26)
GUICtrlSetData($Button26, $sdata26)
IniWrite("stunden.ini","zeile26","stunden",$sdata26)
Case $Button27
$sdata27 = InputBox("Angabe","Bitte gebe ein Fach an !")
GUICtrlRead($sdata27)
GUICtrlSetData($Button27, $sdata27)
IniWrite("stunden.ini","zeile27","stunden",$sdata27)
Case $Button28
$sdata28 = InputBox("Angabe","Bitte gebe ein Fach an !")
GUICtrlRead($sdata28)
GUICtrlSetData($Button28, $sdata28)
IniWrite("stunden.ini","zeile28","stunden",$sdata28)
Case $Button29
$sdata29 = InputBox("Angabe","Bitte gebe ein Fach an !")
GUICtrlRead($sdata29)
GUICtrlSetData($Button29, $sdata29)
IniWrite("stunden.ini","zeile29","stunden",$sdata29)
Case $Button30
$sdata30 = InputBox("Angabe","Bitte gebe ein Fach an !")
GUICtrlRead($sdata30)
GUICtrlSetData($Button30, $sdata30)
IniWrite("stunden.ini","zeile30","stunden",$sdata30)
Case $Button31
$sdata31 = InputBox("Angabe","Bitte gebe ein Fach an !")
GUICtrlRead($sdata31)
GUICtrlSetData($Button31, $sdata31)
IniWrite("stunden.ini","zeile31","stunden",$sdata31)
Case $Button32
$sdata32 = InputBox("Angabe","Bitte gebe ein Fach an !")
GUICtrlRead($sdata32)
GUICtrlSetData($Button32, $sdata32)
IniWrite("stunden.ini","zeile32","stunden",$sdata32)
Case $Button33
$sdata33 = InputBox("Angabe","Bitte gebe ein Fach an !")
GUICtrlRead($sdata33)
GUICtrlSetData($Button33, $sdata33)
IniWrite("stunden.ini","zeile33","stunden",$sdata33)
Case $Button34
$sdata34 = InputBox("Angabe","Bitte gebe ein Fach an !")
GUICtrlRead($sdata34)
GUICtrlSetData($Button34, $sdata34)
IniWrite("stunden.ini","zeile34","stunden",$sdata34)
Case $Button35
$sdata35 = InputBox("Angabe","Bitte gebe ein Fach an !")
GUICtrlRead($sdata35)
GUICtrlSetData($Button35, $sdata35)
IniWrite("stunden.ini","zeile35","stunden",$sdata35)
EndSwitch
WEnd