StingGrid Cells am Anfange einfügen

[Christian Seehase]

Moin Thomas,

Du kannst direkt die Eigenschaft Rows benutzen.

Delphi-Quellcode:

var
  iRows : integer;

begin
  for iRows := StringGrid1.RowCount downto 0 do begin
    StringGrid1.Rows[iRows+1] := StringGrid1.Rows[iRows];
  end;
  StringGrid1.RowCount := StringGrid1.RowCount+1;
  // jetzt kann Zeile 0 befüllt werden
end;