Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

* Edit-Feld mit Eingabe verlassen

42 views
Skip to first unread message

Klaus Niemann

unread,
Nov 30, 2003, 7:53:52 AM11/30/03
to
Hallo NG,

ich habe schon überall gesucht, aber ohne Erfolg.
Ich habe eine Anwendung unter Delphi 3 mit mehreren Edit-Feldern. Wie
kann man ein Eingabefeld (z.B. Edit1) mit der Enter-Taste verlassen
und automatisch ins nächste (z.B. Edit2) gelangen? Bisher springe ich
mit der Tab-Taste. Jetzt ist aber die Verwendung der Enter-Taste
nötig.
Wer weiß Rat?
mfG
Klaus Niemann

Marian Aldenhoevel

unread,
Nov 30, 2003, 8:37:32 AM11/30/03
to
Hi,

> Jetzt ist aber die Verwendung der Enter-Taste nötig.

Es ist für mich immer wieder faszinierend, wie diese Gewohnheit sich
auch nach mehr als einer Dekade Tab als Systemstandard nicht
totkriegen lässt. Vielleicht liegt das aber einfach daran, daß ich
kein Zehnerblock-Mensch bin.

> Wer weiß Rat?

Deins ist eine FAQ. Behandle das OnKeyDown-Ereignis und sende eine
WM_NEXTDLGCTL-Nachricht an das Formular.

Ciao, MM
--
Rosenhain 23, 53123 Bonn - Fon +49 228 6203366, Fax +49 228 624031
www.marian-aldenhoevel.de
"Früher tauschte man Frauen gegen Ziegen, das war was
Handfestes" - D. Nuhr

Ralf Weber

unread,
Nov 30, 2003, 3:21:29 PM11/30/03
to
On 30 Nov 2003 04:53:52 -0800, e5...@gmx.de (Klaus Niemann) wrote:

>Wie kann man ein Eingabefeld (z.B. Edit1) mit der Enter-Taste verlassen
>und automatisch ins nächste (z.B. Edit2) gelangen? Bisher springe ich
>mit der Tab-Taste. Jetzt ist aber die Verwendung der Enter-Taste
>nötig.

Mit dem onKeyPress-Ereignis und dann Abfrage:

wenn Key = chr(13) dann
nächstes Edit-Feld Eigenschaft Focused := true

mfg, Ralf...
--
"Das Gute reist mit der Geschwindigkeit einer Schlange.
Das Böse hat Flügel."
Mahatma Gandhi
--

Stefan Koelmann

unread,
Nov 30, 2003, 3:29:46 PM11/30/03
to
Hi!

versuch mal folgendes ins OnKeyPress-Ereignis des Edit-Feldes zu packen:

if (key=#13) then
begin
perform(WM_NEXTDLGCTL, 0, 0);
key := #0;
end;

Uwe Witfer

unread,
Dec 5, 2003, 10:40:53 AM12/5/03
to

>>> Stefan Koelmann<ste...@da-kulmi.de> 30.11.2003 21:29 >>>
Hi!

Dieser Code ist richtig, er gehört allerdings in das OnKeyPress-Ereignis des Formulars.
Ausserdem muß im Formular "KeyPreview" auf "True" gesetzt werden.
Damit wird nur ein Event programmiert, und man muß nicht in jedem Edit-Feld darauf achten,
daß die Ereignisbehandlungsroutine eingebunden ist.

Gruß Uwe

0 new messages