Hallo,
Warum reagiert die Procedur auf Tataur Ereignisse der
"Einfg","Entf","Pos1","Ende" etc. Tasten aber warum wird sie nicht aufgerufen, wenn ich die Pfeiltasten betätige?
Delphi-Quellcode:
procedure TQuelltextBox.KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
case key of
VK_DELETE : Projekt.AktuelleDatei.Quelltext.DeleteZeichen(1);
VK_LEFT : Projekt.AktuelleDatei.Quelltext.CursorBewegen(-1, 0);
VK_RIGHT : Projekt.AktuelleDatei.Quelltext.CursorBewegen( 1, 0);
VK_UP : Projekt.AktuelleDatei.Quelltext.CursorBewegen( 0,-1);
VK_DOWN : Projekt.AktuelleDatei.Quelltext.CursorBewegen( 0, 1);
end;
end;