Das kann wohl nur an der SteinZahl liegen...
Die hat wohl im Moment den Wert 2. Dadurch wird der Code
Delphi-Quellcode:
MainFrm.SynMemo.Lines.Add('k'+IntToStr(k)+'X='+IntToStr(i*37));
MainFrm.SynMemo.Lines.Add('k'+IntToStr(k)+'Y='+IntToStr(j*18));
MainFrm.SynMemo.Lines.Add('k'+IntToStr(k)+'I='+IntToStr(Steine[i,j].typ));
in der IF-Schleife zwei mal ausgeführt.
Bis dann,
[EDIT]Wieder zu langsam...[/EDIT]
Yannick F.
mfG - Yannick