Entwickler-Ecke
Grafische Benutzeroberflächen (VCL & FireMonkey) - OnKeyPress ???
Jagg - Mi 17.07.02 14:23
Titel: OnKeyPress ???
Hallo !
Ich habe EditFelder dynamisch erzeugt und will jetzt auch das man durch das Drücken der "Enter-Taste" zum nächsten Feld gelangt !
Wie mache ich das ???
Ich habe schon einen Anfang : TE.OnKeyPress..... (wie geht es weiter !)
Jagg !
PS : TE = dynamisches EditFeld !
L.E.A. - Mi 17.07.02 19:15
Schreib einen Eventhandler für das OnKeyPressed-Ereignis. In etwa so:
Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
| procedure KeyPress1(Sender: TObject; var Key: Char);
begin
case ord(key) of
13: {"Enter" bsteht aus #13 und #10 - sollte also auch bei 10 funktionieren}
begin
form1.FocusControl(TE2);
{form1 ist das Formular mit den Editfeldern, TE2 ist das Editfeld, das den Focus erhält}
end;
end;
end; |
Jetzt mußt du (z.B. beim Create)
Quelltext
1:
| TE.OnKeyPressed := KeyPress1; |
setzten.
Ciao
Dirk
Jagg - Do 18.07.02 08:55
danke
Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2025 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!