Im Beispiel werden basierend auf dem ausgewählten Datensatz im ersten Grid weitere Daten geladen und diese geladenen Daten dann ins zweite eingefügt.
Was du willst wäre wohl das hier (Syntax kann falsch sein, benutze das AdvStringGrid...):
Delphi-Quellcode:
procedure TFormMain.Uebertragen(Sender: TObject);
var
i : integer;
begin
for i := StringGrid1.Selection.Top to StringGrid1.Selection.Bottom do
begin
StringGrid2.AddRow;
for j := 0 to StringGrid1.Columns do
begin
StringGrid2.Cells[j, StringGrid2.RowCount-1] := StringGrid1.Cells[j,i];
end;
end;
end;
end;