Hallo Leute,
ich arbeite gerade an einem Script, der z.B. Sachen in chats eingeben vereinfachen soll. Dazu ist eine Gui mit vielen Buttons nötig. Da ich den Namen der Buttons aus einer Ini-Datei herleiten will und keinen ewig langen script haben will, habe ich es mit Do Until versucht. Klappt auch alles soweit, aber es erscheinen nicht alle Buttons ![]()
Hierzu der Quelltext:
Spoiler anzeigen
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
Global $cheat, $stoff[25], $1=1, $Button[25], $Zeilenzahl=1, $Spaltenzahl=1
#Region ### START Koda GUI section ### Form=
$gui1 = GUICreate("Form1", 450, 329, 192, 124)
$Hallo = GUICtrlCreateLabel("Hallo", 8, 8, 436, 73)
GUICtrlSetFont(-1, 14, 400, 0, "Comic Sans MS")
Do
If $Zeilenzahl=1 Or 5 Or 9 Or 13 Or 17 Or 21 Then
$Zeile=8
ElseIf $Zeilenzahl=2 Or 6 Or 10 Or 14 Or 18 Or 22 Then
$Zeile=120
ElseIf $Zeilenzahl=3 Or 7 Or 11 Or 15 Or 19 Or 23 Then
$Zeile=232
ElseIf $Zeilenzahl=4 Or 8 Or 12 Or 16 Or 20 Or 24 Then
$Zeile=344
EndIf
If $Spaltenzahl<=4 Then
$Spalte=88
ElseIf $Spaltenzahl<=8 Then
$Spalte=128
ElseIf $Spaltenzahl<=12 Then
$Spalte=168
ElseIf $Spaltenzahl<=16 Then
$Spalte=208
ElseIf $Spaltenzahl<=20 Then
$Spalte=248
ElseIf $Spaltenzahl<=24 Then
$Spalte=288
EndIf
$stoff[$1]=IniRead(@ScriptDir&"\data.ini", $1, "Button", "0")
If $stoff[$1]=0 Then
$Button[$1] = GUICtrlCreateButton("Leer", $Zeile, $Spalte, 97, 33)
Else
$Button[$1] = GUICtrlCreateButton($Stoff[$1], $Zeile, $Spalte, 97, 33)
EndIf
$1=$1+1
$Zeilenzahl=$Zeilenzahl+1
$Spaltenzahl=$Spaltenzahl+1
Until $1=25
GUISetState(@SW_SHOW)
Des weiteren klaapt das mit der Ini-Datei nicht. Ich habe zwar in der datei etwas zu stehen, aber es wird einfach gelesen, also es staht immer leer in den Buttons. Ich bitte um Hilfe, denn ich weiß echt nicht weiter.
Danke im Vorraus
Grünschnabel