Moin,
ich wollte mal eben den
DB Navigator nachprogrammieren. Funktioniert soweit auch, nur wenn man mit dem Next Button zum letzten Datensatz navigiert werden die Buttons "Next" und "Last" nicht disabled. Erst beim nächsten Klick, der natürlich keinen neuen Datensatz anzeigt. Kann ich irgendwie abfragen ob der nächste Datzensatz eof ist?
Delphi-Quellcode:
procedure TFRM_NewUser.BtnLastClick(Sender: TObject);
begin
DM_ProjectPoint.TB_Users.Last;
BtnFirst.Enabled := true; BtnPrior.Enabled := true;
BtnNext.Enabled := false; BtnLast.Enabled := false;
end;
procedure TFRM_NewUser.BtnNextClick(Sender: TObject);
begin
DM_ProjectPoint.TB_Users.Next;
BtnFirst.Enabled := true; BtnPrior.Enabled := true;
if DM_ProjectPoint.TB_Users.Eof then BtnLastClick(self);
end;
Ciao
Marcus
ps. mir ist gerade aufgefallen das der DBNavigator auch erst beim nächsten klick die buttons deaktiviert...