ActiveControl und GroupBox mit Edit-Feldern

[bioser]

hi, ich habe mehrere GroupBoxen, auf denen sich wiederum mehrere
Edit-Felder befinden und eine Bildschirmtastatur, die ich als
AppBar implementiert habe.
Im Prinzip müßte ich für jedes Edit-Feld im OnChange-Handler
folgenden Code einsetzen:

Form1.ActiveControl := TEditNR; Damit könnte ich noch leben. Aber was mache ich, wenn ich
auf meiner virtuellen Tastatur eine Taste drücke, in welches
Feld ich schreiben muß. Ich kann doch nicht immer wieder
folgende Abfrage machen:

if Form1.ActiveControl = TEditNR then schreibe Zeichen in Feld TEditNR Wisst Ihr da ne bessere Lösung ?

Gruss
BIOSER