;Funktionen
Global $Pfad
Global $Anzahl

;Funktion Bild Aufnahmen
 Func _BildAufnahmen()
	;Werte Aus INT Laden
	
	
	;Bilder verschieben
   For $i = $Anzahl to 2 Step -1
      FileDelete(@ScriptDir & "\Bilder\Bild"&$i&".jpg")
      FileMove(@ScriptDir & "\Bilder\Bild"&$i-1&".jpg",@ScriptDir & "\Bilder\Bild"&$i&".jpg")
   Next
   $i=1
   ; Neues Bild Speichern
   InetGet($Pfad, @ScriptDir & "\Bilder\Bild"&$i&".jpg",1)
EndFunc


;Input Werte Speicherin in int
Func _SaveConfigGui()
   $_save = $Pfad
	IniWrite(@ScriptDir & "\setup.ini", "Pfad", "Adresse", $_save)
   $_save = $Anzahl
	IniWrite(@ScriptDir & "\setup.ini", "Bild", "Anzahl", $_save)
	
EndFunc

;Input werte lesen aus int
Func _LoadConfigGui()
   $Pfad = IniRead(@ScriptDir & "\setup.ini", "Pfad", "Adresse" , "http://192.168.178.24/Jpeg/CamImg*.jpg")
   $Anzahl = IniRead(@ScriptDir & "\setup.ini", "Bild", "Anzahl" , "10")
		
 EndFunc