StingGrid Cells am Anfange einfügen

[thklingler]

Hallo, hat jemand ne Idee wie man bei einem StringGird erreichen kann das eine neue Reihe mit Informationen oben eingefügt wird und nicht unten.

Im Moment mache ich es so:

Delphi-Quellcode:

StringGrid1.RowCount := StringGrid1.RowCount+1;
i:= StringGrid1.RowCount-1;
with stringGrid1 do
 begin
 cells [0,i] := IntToStr(i);
 cells [1,i] := idcall('49'+nummer); // Name wenn angebunden an Data

[sakura]

Automatisch gar nicht. Du musst die unten anhängen und dann die Daten manuell nach unten schieben und oben Platz schaffen

......

[thklingler]

Meist du das in etwa so:

1. die neuen Daten an eine Stringliste übergeben
2. die Vorhandenen Daten in die Stringliste einfügen
3. Daten im StrningGrid überschreiben

[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;