#include <GUIConstantsEx.au3>
#include <GUIConstants.au3>

Opt('MustDeclareVars', 1)


Example()

Func Example()
    Local $Radio_1, $Radio_2, $Radio_3, $Radio_4, $Kopieren, $msg

    GUICreate("INI Kopieren ver1.0")
	GUICtrlCreateGroup("INI Sicherung Kopieren", 10, 10, 350, 380)
   	$Radio_1 = GUICtrlCreateRadio("Rechner 1", 20, 30)
    $Radio_2 = GUICtrlCreateRadio("Rechner 2", 20, 70)
    $Radio_3 = GUICtrlCreateRadio("Rechner 3", 20, 100)
    $Radio_4 = GUICtrlCreateRadio("Rechner 4", 20, 150)
    $Kopieren = GUICtrlCreateButton("Kopieren", 20, 360)

    GUICtrlCreateGroup("", -99, -99, 1, 1)

    GUISetState()


    While 1
        $msg = GUIGetMsg()
        Switch $msg
            Case $GUI_EVENT_CLOSE
                Exit
            Case $Kopieren
				If BitAND(GUICtrlRead($Radio_1), $GUI_CHECKED) = $GUI_CHECKED Then
					FileCopy ("C:\TMP\Rechner1\Inst-GR.ini", "C:\SOFT\Program\Inst.ini",1)
					FileCopy ("C:\TMP\Rechner1\bild1.bmp", "C:\Programme\Prog1\Picture\",1)
					FileCopy ("C:\TMP\Rechner1\Inst-UK.ini", "C:\SOFT\Program\Inst.ini",1)
					FileCopy ("C:\TMP\Rechner1\bild1.bmp", "C:\Program Files\Prog1\Picture\",1)
					msgbox(1,"Rechner 1","Dateien wurden kopiert")
					EndIf
                If BitAND(GUICtrlRead($Radio_2), $GUI_CHECKED) = $GUI_CHECKED Then
					FileCopy ("C:\TMP\Rechner2\Inst-GR.ini", "C:\SOFT\Program\Inst.ini",1)
					FileCopy ("C:\TMP\Rechner2\bild1.bmp", "C:\Programme\Prog1\Picture\",1)
					FileCopy ("C:\TMP\Rechner2\Inst-UK.ini", "C:\SOFT\Program\Inst.ini",1)
					FileCopy ("C:\TMP\Rechner2\bild1.bmp", "C:\Program Files\Prog1\Picture\",1)
					msgbox(1,"Rechner 1","Dateien wurden kopiert")
					EndIf
				If BitAND(GUICtrlRead($Radio_3), $GUI_CHECKED) = $GUI_CHECKED Then
					FileCopy ("C:\TMP\Rechner3\Inst-GR.ini", "C:\SOFT\Program\Inst.ini",1)
					FileCopy ("C:\TMP\Rechner3\bild1.bmp", "C:\Programme\Prog1\Picture\",1)
					FileCopy ("C:\TMP\Rechner3\Inst-UK.ini", "C:\SOFT\Program\Inst.ini",1)
					FileCopy ("C:\TMP\Rechner3\bild1.bmp", "C:\Program Files\Prog1\Picture\",1)
					msgbox(1,"Rechner 1","Dateien wurden kopiert")
				    EndIf
				If BitAND(GUICtrlRead($Radio_3), $GUI_CHECKED) = $GUI_CHECKED Then
					FileCopy ("C:\TMP\Rechner4\Inst-GR.ini", "C:\SOFT\Program\Inst.ini",1)
					FileCopy ("C:\TMP\Rechner4\bild1.bmp", "C:\Programme\Prog1\Picture\",1)
					FileCopy ("C:\TMP\Rechner4\Inst-UK.ini", "C:\SOFT\Program\Inst.ini",1)
					FileCopy ("C:\TMP\Rechner4\bild1.bmp", "C:\Program Files\Prog1\Picture\",1)
					msgbox(1,"Rechner 1","Dateien wurden kopiert")
					EndIf
		EndSwitch
    WEnd
EndFunc