Edit-Felder => array of integer

[nahpets]

Hallo,

mal ganz schmutzig hingeschrieben ohne Test...:

Delphi-Quellcode:

for i:=1 to 9 do 
  for j:=1 to 9 do 
    Sudoku[i,j] := StrToInt(TEdit(FindComponent('Edit' + IntToStr(i) + IntToStr(j))).Text);

[OT]Ihr seid mir heute zu schnell [/OT]