Einzelnen Beitrag anzeigen

Benutzerbild von -=cats=-
-=cats=-

Registriert seit: 22. Sep 2006
128 Beiträge
 
Delphi 7 Enterprise
 
#1

In "aktives" Textfeld schreiben

  Alt 10. Okt 2006, 12:03
Hi

Ich habe 2 Forms.
Bei der einen Form handelt es sich um
eine Oberfläche mit 2 Textfeldern, bei der
anderen um eine Art "Bildschirmtastatur".

Jetzt habe ich es schon geschafft, dass ich mit
meiner Bildschirmtastatur in Edit1 schreiben kann.
Ich habe es auch hinbekommen, den Cursor am
Ende (wenn die Eingabe beendet sein soll)
in das andere Textfeld springen zu lassen.

Allerdings .. hier ist nun das Problem ...
weiß ich nicht, wie ich da reinschreibe.

Ich mache es so: Sobald auf den Button geklickt wird,
setze ich den entsprechenden Buchstaben in Edit1.
Nun hatte ich mir überlegt, zu schauen, welches
Textfeld den Focus hat. Das wollte ich mit einer
if-Anweisung machen.

Delphi-Quellcode:
if (Form11.Edit1.Focused)
then
 // Schreibe in Edit1
else
 // Schreibe in Edit2
Leider haut das nicht hin. Er schreibt immer in Edit1 ....

Weiß vielleicht jemand, woran das liegen könnte ?

-=cats=-

Vielleicht sollte ich noch erwähnen, dass die Buchstaben bzw. Zahlen,
die in Edit1 stehen, deaktiviert werden. Sie dürfen dann in dem Textfeld
nicht mehr stehen.
Allerdings sollten sie dann für Edit2 wieder aktiviert werden
  Mit Zitat antworten Zitat