Variablenname in for-Schleife hochzählen

KriZza

Moin zusammen,

kurze Frage, und ich habe kein passendes Beispiel gefunden, bzw. ich habe ein Brett vorm Kopf

Wie zähle ich in einer for schleife den Variablennamen hoch?

Hochgezählt werden soll:
$STATION1[5], $STATION2[5], $STATION3[5], $STATION4[5], $STATION5[5], $STATION6[5], $STATION7[5], $STATION8[5], $STATION9[5]
$flabelnote1, $flabelnote2, $flabelnote3, $flabelnote4, $flabelnote5, $flabelnote16, $flabelnote7, $flabelnote8, $flabelnote9

AutoIt

If FileExists($FILEPATHNOTESPATH & "\NOTES1.data") = True Then
		If $notemenu1hoverinf1[4] = $STATION1[5] And $flabelnote1 = "black" Then
			_SetImagefromResource($STATION1[5], "NOTEOKHOVER", @ScriptDir & "\CODE\TTCIMG.dll", $RT_BITMAP)
			$flabelnote1 = "blue"
		ElseIf $notemenu1hoverinf1[4] <> $STATION1[5] And $flabelnote1 = "blue" Then
			_SetImagefromResource($STATION1[5], "NOTEOK", @ScriptDir & "\CODE\TTCIMG.dll", $RT_BITMAP)
			$flabelnote1 = "black"
		ElseIf $notemenu1hoverinf1[2] = 1 and $notemenu1hoverinf1[4] = $STATION1[5]  Then
			_SetImagefromResource($STATION1[5], "NOTEOKMOUSEDOWN", @ScriptDir & "\CODE\TTCIMG.dll", $RT_BITMAP)
		ElseIf $notemenu1hoverinf1[2] = 0 and $notemenu1hoverinf1[4] = $STATION1[5]  Then
			_SetImagefromResource($STATION1[5], "NOTEOKHOVER", @ScriptDir & "\CODE\TTCIMG.dll", $RT_BITMAP)
		EndIf
	Else
		If $notemenu1hoverinf1[4] = $STATION1[5] And $flabelnote1 = "black" Then
			_SetImagefromResource($STATION1[5], "NOTEHOVER", @ScriptDir & "\CODE\TTCIMG.dll", $RT_BITMAP)
			$flabelnote1 = "blue"
		ElseIf $notemenu1hoverinf1[4] <> $STATION1[5] And $flabelnote1 = "blue" Then
			_SetImagefromResource($STATION1[5], "NOTE", @ScriptDir & "\CODE\TTCIMG.dll", $RT_BITMAP)
			$flabelnote1 = "black"
		ElseIf $notemenu1hoverinf1[2] = 1 and $notemenu1hoverinf1[4] = $STATION1[5]  Then
			_SetImagefromResource($STATION1[5], "NOTEMOUSEDOWN", @ScriptDir & "\CODE\TTCIMG.dll", $RT_BITMAP)
		ElseIf $notemenu1hoverinf1[2] = 0 and $notemenu1hoverinf1[4] = $STATION1[5]  Then
			_SetImagefromResource($STATION1[5], "NOTEHOVER", @ScriptDir & "\CODE\TTCIMG.dll", $RT_BITMAP)
		EndIf
EndIf

Alles anzeigen

**AspirinJunkie**

Das geht zwar mit Eval() aber das solltest du trotzdem nicht machen.
Was du stattdessen tun solltest ist aus $flabelnote ein 1D-Array und aus $STATION ein 2D-Array zu machen.
Das was du dann hochzählst ist deren Index.

KriZza

Das wird bei dem Skript leider sehr umständlich die Variablen neu anzupassen, da ich diesen Vorgang wohl für 30-40 Funktionen durchführen werde.

Wie würde denn ein Beispiel für Assign / Eval aussehen? Hätte da jemand einen Tipp für mich anhand des Beispiels von meinem 1. Post?

Also so in etwa stelle ich mir das vor... Klappt aber nicht:

AutoIt

Local $flabelnote = ""
Local $STATIONX = ""


for $i=1 to 9
Assign("STATION" & $i & "[5]", "STATIONX")
Assign("flabelnote" & $i, "flabelnote")
	If FileExists($FILEPATHNOTESPATH & "\NOTES1.data") = True Then
		If $notemenu1hoverinf1[4] = $STATIONX And $flabelnote = "black" Then
			_SetImagefromResource($STATIONX, "NOTEOKHOVER", @ScriptDir & "\CODE\TTCIMG.dll", $RT_BITMAP)
			$flabelnote = "blue"
		ElseIf $notemenu1hoverinf1[4] <> $STATIONX And $flabelnote = "blue" Then
			_SetImagefromResource($STATIONX, "NOTEOK", @ScriptDir & "\CODE\TTCIMG.dll", $RT_BITMAP)
			$flabelnote = "black"
		ElseIf $notemenu1hoverinf1[2] = 1 and $notemenu1hoverinf1[4] = $STATIONX  Then
			_SetImagefromResource($STATIONX, "NOTEOKMOUSEDOWN", @ScriptDir & "\CODE\TTCIMG.dll", $RT_BITMAP)
		ElseIf $notemenu1hoverinf1[2] = 0 and $notemenu1hoverinf1[4] = $STATIONX  Then
			_SetImagefromResource($STATIONX, "NOTEOKHOVER", @ScriptDir & "\CODE\TTCIMG.dll", $RT_BITMAP)
		EndIf
	Else
		If $notemenu1hoverinf1[4] = $STATIONX And $flabelnote = "black" Then
			_SetImagefromResource($STATIONX, "NOTEHOVER", @ScriptDir & "\CODE\TTCIMG.dll", $RT_BITMAP)
			$flabelnote = "blue"
		ElseIf $notemenu1hoverinf1[4] <> $STATIONX And $flabelnote = "blue" Then
			_SetImagefromResource($STATIONX, "NOTE", @ScriptDir & "\CODE\TTCIMG.dll", $RT_BITMAP)
			$flabelnote = "black"
		ElseIf $notemenu1hoverinf1[2] = 1 and $notemenu1hoverinf1[4] = $STATIONX  Then
			_SetImagefromResource($STATIONX, "NOTEMOUSEDOWN", @ScriptDir & "\CODE\TTCIMG.dll", $RT_BITMAP)
		ElseIf $notemenu1hoverinf1[2] = 0 and $notemenu1hoverinf1[4] = $STATIONX  Then
			_SetImagefromResource($STATIONX, "NOTEHOVER", @ScriptDir & "\CODE\TTCIMG.dll", $RT_BITMAP)
		EndIf
	EndIf
Next

Alles anzeigen

**BugFix**

In deinem Fall könntest du Eval() / Assign() für deine Variable $flabelnote zwar verwenden, nicht aber für $STATION. Eval/Assign kann nicht mit Arrays genutzt werden.
Also ändere dein Skript auf reine Arraynutzung. Ist im Moment vielleicht etwas Arbeit - da es aber nicht anders geht, bleibt dir eh keine Wahl.

KriZza

Alles klar, das gibt wenigstens Gewissheit ;-). Danke