Hallo Lombi,
ich nehme an, du möchtest die Daten aus dem aktuellen Datensatz deiner
Query als neue Zeile an das StringGrid anfügen. Probiere es so:
Delphi-Quellcode:
procedure TFRechn.BtnArtNeuClick(Sender: TObject);
var
inZeile: Integer;
begin
with StringGridReDat, QueryReDat do
begin
inZeile := RowCount;
RowCount := RowCount + 1;
Cells[1, inZeile] := FieldByName('PosNr').AsString;
Cells[2, inZeile] := FieldByName('ArtNr').AsString;
// ...
end;
end;
Freundliche Grüße vom marabu