okay..sorry
Daten aus einer Liste in .ini schreiben
-
- [ offen ]
-
chriss0610 -
19. April 2010 um 15:16 -
Geschlossen -
Erledigt
-
-
hättest du denn eine andere idee?
-
Also ich werde deine Idee erstmal weiterverfolgen, ist bestimmt nen guter Ansatz. hab jetzt erstmal das reingemacht, dass die Teams in den Gruppen eingetragen werden und das sie auch in die INI eingetragen werden.
Spoiler anzeigen
[autoit]#include <GUIConstantsEx.au3>
[/autoit] [autoit][/autoit] [autoit]
#Include <GuiListBox.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>Global $sPath = @ScriptDir & "\Data"
[/autoit] [autoit][/autoit] [autoit]
Global $aGroups[4] = ["A", "B", "C", "D"]
Global $aCtrlPos[4] = [20, 140, 260, 380]
Global $ahAddTeam[4], $ahTeamList[4]DirCreate($sPath)
[/autoit] [autoit][/autoit] [autoit]$hGui = GUICreate("Turnier Manager", 600, 400)
[/autoit] [autoit][/autoit] [autoit]
For $i = 0 To UBound($aGroups) - 1
GUICtrlCreateLabel("Gruppe " & $aGroups[$i], $aCtrlPos[$i], 20, 100, 20, $SS_CENTER)
$ahAddTeam[$i] = GUICtrlCreateButton("Team eintragen", $aCtrlPos[$i], 50, 100, 25)
$ahTeamList[$i] = GUICtrlCreateList("", $aCtrlPos[$i], 90, 100, 140, $WS_VSCROLL)
Next
GUISetState()While 1
[/autoit]
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $ahAddTeam[0], $ahAddTeam[1], $ahAddTeam[2], $ahAddTeam[3]
For $i = 0 To UBound($aGroups) - 1
If $nMsg = $ahAddTeam[$i] Then
$sAddTeam = InputBox("Team eintragen in Gruppe " & $aGroups[$i], "Name des Teams:", "", "", 250, 125, Default, Default, 0, $hGui)
If $sAddTeam <> "" Then
GUICtrlSetData($ahTeamList[$i], $sAddTeam)
IniWrite($sPath & "\Teams.ini", "Gruppe " & $aGroups[$i], _GUICtrlListBox_GetCount($ahTeamList[$i]), $sAddTeam)
EndIf
ExitLoop
EndIf
Next
EndSwitch
WEnd -