Hai Sanguis,
es ist wirklich so das
.Eof erst True wird venn versucht wird vom letzten Datensatz weiter zu springen.
Darum ist es am einfachsten mit dem von zecke vorgeschlagenen Weg zu arbeiten. Dies würde ich aber nicht in die Verarbeitungsprocedure setzen (OnClick des Buttons) sondern in das
AfterScroll des DataSets.
Delphi-Quellcode:
procedure TForm1.QueryAfterScroll(DataSet: TDataSet);
begin
if (DataSet.RecNo = DataSet.RecordCount) then
begin
next.Caption := 'Ende';
end
else
begin
next.Caption := 'Next';
end;
end;
Stephan B.
"Lasst den Gänsen ihre Füßchen"