Cursorposition angeben

klezmor · Beiträge: 558 delphi 6 personal delphi 2005 personal

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. · Beiträge: 754 Win 2000, XP D2005

Kcuk Dir mal die Eigenschaft TabOrder an.

_________________
Gruß Harry
Et spes me per dies sine te ducat et amor me ferat, si dolor spem tollit.

TM · Beiträge: 74 Win xp D7 ET

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?

..

_________________
Dieser Beitrag enthält keine Schreibfehler.
Das sind versteckte Hinweise.

starsurfer · Verfasst: 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

markieren

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 · Beiträge: 74 Win xp D7 ET

Ja, so hab ich mir das auch gedacht.

_________________
Dieser Beitrag enthält keine Schreibfehler.
Das sind versteckte Hinweise.

klezmor · Beiträge: 558 delphi 6 personal delphi 2005 personal

Danke hat funktioniert.

Ehemaliges Mitglied Erhaltene Danke: 1

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

markieren

Delphi-Quelltext

1:	SendMessage(handle, WM_NEXTDLGCTL, 0, 0);

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme