.. sollte das nicht eof heißen?
Delphi-Quellcode:
while NOT Datensatz.eof{Bof} do
Begin
Rg:='';
for N := 0 to DatenSatz.FieldCount-1 do
Rg:=Rg+' '+DatenSatz.Fields[N].AsString;
ShowMessage(Rg);
DatenSatz.Next;
End;
oder
Delphi-Quellcode:
repeat
Rg:='';
for N := 0 to DatenSatz.FieldCount-1 do
Rg:=Rg+' '+DatenSatz.Fields[N].AsString;
ShowMessage(Rg);
DatenSatz.Next;
until Datensatz.eof
Grüße
Klaus