Entwickler-Ecke

Sonstiges (Delphi) - Cursorposition angeben


klezmor - Do 11.08.05 19:20
Titel: Cursorposition angeben
Hallo wie schaffe ich es, dass der Cursor bei der Bestätigung eines Edit-Fensters zum nächsten Edit weiterspringt, die key abfrage kenne ich, mir geht es nur um die Funktion, wie man die Position eines Cursors angibt?


Harry M. - Do 11.08.05 19:23

Kcuk Dir mal die Eigenschaft TabOrder an.


TM - Do 11.08.05 19:32

Hallo

Ich hab eigentlich keine Ahnung, aber meines Wissens brauchst du da eine Prozedur die, z.B. wenn man im 1. Eingabefeld auf Enter drückt, das 2. Eingabefeld mit '... .setfocus' auswählt.

oder? :?

..


starsurfer - Do 11.08.05 19:57

hier mal ne Möglichkeit:

2.Komponenten:
Edit1 <<< hat das Ereignis "onKeyDown"
Edit2

wenn man sich im ersten Edit Feld befindet und Enter drückt, springt er zum zweiten Edit Feld


Delphi-Quelltext
1:
2:
3:
4:
procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
begin
if key=VK_RETURN then edit2.SetFocus;
end;


TM - Do 11.08.05 20:01

Ja, so hab ich mir das auch gedacht.


klezmor - Do 11.08.05 21:20

Danke hat funktioniert.


Delete - Do 11.08.05 21:52

Wird etwas mühsam, bei meherer Edits. Liebr jedem Edit die gleiche OnKeyPress methode zu weisen und dort reinschreiben:

Delphi-Quelltext
1:
SendMessage(handle, WM_NEXTDLGCTL, 00);