hallo,
ich habe einer frage:
wie kann ich machen, dass die Radios ausgelesen werden, wenn ich Button1 drücke??
also ich habe es bis jetzt immer mit IF gemacht aber in diesem Fall bringt da irgentwie nur probleme.
Z.B sagt das Programm, das beide Radios gedrückt sind.
Code
#include #include
#Region ### START Koda GUI section ### Form=$Form1 = GUICreate("LoL Patcher Installer", 510, 311, 193, 125)$Progress1 = GUICtrlCreateProgress(40, 8, 433, 25)$Button1 = GUICtrlCreateButton("Installieren", 376, 56, 105, 25, 0)$Radio1 = GUICtrlCreateRadio("Standart Installation", 48, 56, 113, 17)GUICtrlSetState ($radio1, $GUI_CHECKED)$Label1 = GUICtrlCreateLabel("Alle Normalen Einstellungen", 64, 72, 135, 17)$Radio2 = GUICtrlCreateRadio("Benutzerdefinierte Installation", 48, 112, 169, 17)$Group1 = GUICtrlCreateGroup("Installationspfad:", 56, 136, 337, 65)$Input1 = GUICtrlCreateInput("", 72, 160, 201, 21)$Button2 = GUICtrlCreateButton("Durchsuchen...", 288, 160, 91, 25, 0)GUICtrlCreateGroup("", -99, -99, 1, 1)$Group2 = GUICtrlCreateGroup("League of Legends Installationspfad:", 56, 208, 337, 65)$Input2 = GUICtrlCreateInput("", 72, 232, 201, 21)$Button3 = GUICtrlCreateButton("Durchsuchen...", 288, 232, 91, 25, 0)GUICtrlCreateGroup("", -99, -99, 1, 1)GUISetState(@SW_SHOW)#EndRegion ### END Koda GUI section ###
While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $Button1 Copy ();Progress () Case $Button2 $dialog2=FileSelectFolder ("Installationspfad auswählen",@HomeDrive) If Not @error Then GUICtrlSetData($Input1, $dialog2)
EndSwitchWEnd Func Progress () GUICtrlSetData ($Button1 ," Stop") For $1=1 to 100 GUICtrlSetData ($Progress1,$1) Sleep (60) Next EndFunc Func Copy () $Radio111=GUICtrlRead ($Radio1) $Radio222=GUICtrlRead ($Radio2) If $Radio111=True Then MsgBox (0,"","if") #cs ---------------------------------------------------------------------------- $username=@UserName $Scribtdir=@ScriptDir _Zip_UnzipAll($scribtdir&"\LoL Patcher.zip","C:\Users\"&@UserName&"\AppData\Roaming",1) Sleep (2000) FileCreateShortcut ( "C:\Users\"&$username&"\AppData\Roaming\LoL Patcher\League of Legends patcher.exe", @DesktopDir&"\LoL Patcher") #ce ---------------------------------------------------------------------------- EndIf If $Radio222=True Then MsgBox (0,"","elseif") ;$username=@UserName ;$Scribtdir=@ScriptDir ;$Input11=GUICtrlRead($Input1) ;$Input22=GUICtrlRead($Input2) ;_Zip_UnzipAll($scribtdir&"\LoL Patcher.zip",$Input11,1) ;FileCreateShortcut ($Input11&"\League of Legends patcher.exe", @DesktopDir&"\LoL Patcher") Else MsgBox(0,"as","else") EndIf EndFunc
DIe Funktionen sind deshalb auskommentiert, damit ich herausfinden kann, ob das programm funktioniert.
über hilfe würde ich mich freuen bin halt nicht so der Profi drin.
MFg
EDIT:
wie kann ich hier einen Code einbinden; bei mir ist er hintereinander geschrieben, wenn ich ihn einfüge