Stringgrid kopieren und in anderes einfügen untereinander

[klaus9]

hmm irgendwie funktioniert es nicht so..

Delphi-Quellcode:

var
  ndx : Integer;
begin
  Form1.StringGrid2.ColCount:= Form1.StringGrid1.ColCount;
  Form1.StringGrid2.RowCount := Form1.StringGrid1.RowCount;


  for ndx := 0 to StringGrid1.RowCount +1 do
  begin
    Form1.StringGrid2.Rows[ndx].Add := Form1.StringGrid1.Rows[ndx];
  end;
end;