Ich habe eine zum Navigieren in einer Datenbank 4 Buttons und noch 3 weitere zum erstellen, speichern und abbrechen. Wenn ich mit Hilfe der Buttons zum letzten oder ersten Eintrag springe bleiben die Buttons enabled
Delphi-Quellcode:
DM_Buecher.ADO_DS_Buecher.First;
But_letzter.Enabled := True; But_Naechster.Enabled := True;
But_Vorheriger.Enabled := False; But_Erster.Enabled := False
auch wenn ich dann wieder mit einem anderen button oder dem wheel weg navigiere.
Delphi-Quellcode:
DM_Buecher.ADO_DS_Buecher.next;
But_erster.Enabled := True; But_vorheriger.Enabled := True;
if DM_Buecher.ADO_DS_Buecher.Eof then But_LetzterClick(Self)
Allerdings nur wenn ich einen anderen als den Windowsstyle benutze.