Hallo Dragi,
du kannst über die Eigenschaft RecNo den aktuellen Datensatz wählen. Ich habe im Code deine Zellenadressierung geändert, so dass die Felder eines Satzes in den Spalten einer Zeile angezeigt werden - bei dir wurden die Felder eines Satzes untereinander geschrieben. Bei der Zeilenadressierung habe ich Titelzeilen im StringGrid berücksichtigt.
Generell solltest du dir eine Namenskonvention für deine Komponenten und Variablen auferlegen. Die von der
IDE vorgegebene Konvention - Klassenname mit angehängtem Zähler, aber ohne T - ist zu abstrakt.
Delphi-Quellcode:
procedure TForm2.FillGrid(Sender: TObject);
var
i, iRow: integer;
begin
iRow := StringGrid1.FixedRows;
with ADODataSet1 do
for i := 1 to RecordCount do
begin
RecNo := i;
StringGrid1.Cells[0, iRow] := FieldByName('Name').AsString;
StringGrid1.Cells[1, iRow] := FieldByName('Strasse').AsString;
Inc(iRow);
end;
end;
Kennst du schon
TDBGrid und
TListView?
Grüße vom marabu