Forum: Programmieren allgemein
by lucy,
14. Nov 2022
bekomme es einfach nicht hin?
es werden immer zwei neue Zeilen erzeugt... bzw. eine überschrieben
procedure TForm2.Button1Click(Sender: TObject);
var
i: integer;
begin
StringGrid1.RowCount := StringGrid1.RowCount +1;
for i := StringGrid1.RowCount - 2 downto StringGrid1.FixedRows + 1 do
Forum: Programmieren allgemein
by lucy,
31. Okt 2022
Hallo,
habe hier im Forum schon gesucht, bin aber leider noch nicht fündig geworden.
Zurzeit wird die neue Zeile (im StringGrid) unten angehängt.
Wie kann man die aktuelle Zeile oben im StringGrid einfügen?
So das die älteren Datensätze nach unten geschoben werden.
procedure TForm1.ClientSocket1Read(Sender: TObject; Socket: TCustomWinSocket);
var