mit Pfeiltasten in DBGrid navigieren

SystemError · Hält's aus hier Beiträge: 7

mich beschäftigt mom ein Problem mit einer DBGrid. Und zwar möchte ich, dass man mit den Pfeiltasten (Up, Down) in der DBGrid navigieren kann. Mit der Standardroutine OnKeyDown klappt das ja auch ganz gut, bis auf ein Problem: Wenn man schon in der letzten angezeigten Zeile der DBGrid ist, soll es nicht mehr möglich sein (bzw. funktionieren) weiter nach unten zu springen. Gibt es eine Möglichkeit zu erkennen, ob man in der letzten Zeile ist und den Zeiger bei KeyUp einfach auf dem letzten Eintrag zu belassen? Momentan springt er bei mir dann immer zum allerersten Eintrag in der Datenbank, ohne allerdings den Zeiger in der Grid zu ändern.

ffgorcky · Beiträge: 573 WIN XP/2000 & 7Prof (Familie:Win95,Win98)

Also ich meine, das müsste so in etwa gehen (Pseudocode):

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:

Procedure KeyUp(Taste:Key)
begin
if Taste=ButtonDown and DBGridWelchesEsBetrifft.ActiveLine=DBGridWelchesEsBetrifft.Lines.Count-1 then
  begin
  MessageDlg('Sie sind doch schon im letzen Eintag!','Noch weiter?',MB_OK)
  abort;
  end;

Zumindest so ähnlich müsste es machbar sein.

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme