Zitat von
RX3:
Delphi-Quellcode:
..
for iCol := 1 to StringGrid1.ColCount do
StringGrid1.Cells[iCol,0] := 'Planet '+ IntToStr(iCol);
inc(iCol);
for iRow := 1 to StringGrid1.RowCount - 1 do
for iCol:= 0 to StringGrid1.ColCount - 1 do
StringGrid1.Cells[0,iRow] := EditName.Text + ' | ' + EditAlly.Text;
inc(iRow);
...
Als erstes sieht man mal nicht, wo (und ob überhaupt) RowCount erhöht wird. Folge : irgendwelche Fehler.
Das nächste ist das "Inc". Hättest Du stattdessen i := i + 1 geschrieben, dann würde so was eher auffallen. Ausnahme sind Nanosekunden-Testprogramme. Du veränderst die for-Variable innerhalb der Schleife und das ist meist tödlich. Dann wird noch einmal bei 0 und dann bei 1 in den FOR-Schleifen begonnen.