Einzelnen Beitrag anzeigen

Z4ppy

Registriert seit: 25. Apr 2008
269 Beiträge
 
Delphi 7 Enterprise
 
#1

Edit-Felder => array of integer

  Alt 27. Jan 2009, 16:31
Ich programmiere zurzeit an einem Sudoku Solver
Nun hab ich eine Variable Sudoku (array[1..9,1..9] of integer), die die gegebenen Zahlen enthalten soll. Eingegeben wird alles über 81 Editfelder (Kommt mir jetzt nicht mit Kritik, ich solle es mit StringGrid machen, ich wills mit Editfeldern lösen )

Ich habe die Editfelder allerdings schlau benannt, nämlich nicht einfach Edit1, Edit2 usw., sondern so:
1. Zeile des Sudokus: Edit11, Edit12, Edit13, ... , Edit19
2. Zeile des Sudokus: Edit21, Edit22, Edit23, ... , Edit29
usw.

Nun zu meinem Problem:
Ich könnte das ganze natürlich so einspeichern:
Delphi-Quellcode:
Sudoku[1,1]:=StrToInt(Edit11.Text);
Sudoku[1,2]:=StrToInt(Edit12.Text);
{...}
Sudoku[9,8]:=StrToInt(Edit98.Text);
Sudoku[9,9]:=StrToInt(Edit99.Text);
Allerdings bin ich zu faul, das so zu lösen Gibts eine klügere Methode? z.B. mit einer for-Schleife like this:
Delphi-Quellcode:
for i:=1 to 9 do
  for j:=1 to 9 do
    Sudoku[i,j]:=StrToInt(Editij.Text);
Natürlich wird das so nicht funktionieren wegen dem "Editij", aber ich denke, ihr wisst, was ich meine

MfG Z4ppy

PS.: Ja, ich weiss, ich muss testen ob in den Edit-Feldern ein Integer steht und das mach ich vorher auch, daher ist das StrToInt da sicher kein Problem
  Mit Zitat antworten Zitat