Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi StingGrid Cells am Anfange einfügen (https://www.delphipraxis.net/33688-stinggrid-cells-am-anfange-einfuegen.html)

thklingler 11. Nov 2004 10:17


StingGrid Cells am Anfange einfügen
 
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 11. Nov 2004 10:18

Re: StingGrid Cells am Anfange einfügen
 
Automatisch gar nicht. Du musst die unten anhängen und dann die Daten manuell nach unten schieben und oben Platz schaffen :?

...:cat:...

DP-Maintenance 11. Nov 2004 10:18

DP-Maintenance
 
Dieses Thema wurde von "sakura" von "Object-Pascal / Delphi-Language" nach "VCL-Komponenten und Controls" verschoben.

thklingler 11. Nov 2004 10:26

Re: StingGrid Cells am Anfange einfügen
 
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 11. Nov 2004 21:49

Re: StingGrid Cells am Anfange einfügen
 
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;


Alle Zeitangaben in WEZ +1. Es ist jetzt 01:01 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz