Werte in Array austauschen (hoch/runter)
Verfasst: 11.07.2006 16:25
Hallo,
es existieren 20 StringGadgets, deren Inhalt gleichzeitig auch in einem Array gespeichert sind.
Nun soll es möglich sein, dass man z.B. einen Befehl ausführt:
"Feld 0 soll ein Feld runter"
-> Feld 0 landet in Feld 1 und Feld 1 rutscht automatisch auf Feld 0
"Feld 3 soll ein Feld hoch"
-> Feld 3 landet in Feld 2 und Feld 2 rutscht automatisch auf Feld 3
Ist das etwa der richtige Weg, oder geht es intelligenter?
es existieren 20 StringGadgets, deren Inhalt gleichzeitig auch in einem Array gespeichert sind.
Nun soll es möglich sein, dass man z.B. einen Befehl ausführt:
"Feld 0 soll ein Feld runter"
-> Feld 0 landet in Feld 1 und Feld 1 rutscht automatisch auf Feld 0
"Feld 3 soll ein Feld hoch"
-> Feld 3 landet in Feld 2 und Feld 2 rutscht automatisch auf Feld 3
Code: Alles auswählen
Dim Feld.s(20)
Feld(0)="dateiname1.txt"
Feld(1)="dateiname2.txt"
Feld(2)="dateiname3.txt"
Feld(3)="dateiname4.txt"
; usw.
Austausch(1,"hoch")
Procedure Austausch(Was.s,Aktion.s)
; Feldwerte zwischenspeichern
; Felder austauschen (und Checks ob nicht Feld 0 "hoch" soll usw.)
; StringGadgets neu befüllen
EndProcedure