Einzelnen Beitrag anzeigen

mquadrat

Registriert seit: 13. Feb 2004
1.113 Beiträge
 
Delphi XE2 Professional
 
#3

Re: Selektierte Zeilen aus StringGrid 1 in StringGrid 2

  Alt 20. Feb 2009, 08:56
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;
  Mit Zitat antworten Zitat