Laufzeitproblem: Es kommt drauf an, was du machst.
Alle Komponenten durchgehen und schauen was TControl.Focused ist
oder nur die "wenigen" Parents durchlaufen, denn zum aktuell "Aktiven" Control kommt man ja ganz schnell hin.
while Result.Parent is TPanel do
Was ist mit einer TGroupBox?
NOT?
Nja, bei mehreren Panels muß man halt so lange gehen, bis man "eines" der gesuchten Panels findet, oder bei NIL, bzw. der Form angelangt.
Entweder alle
Namen Zeiger vergleichen, oder z.B. Tag oder einen Teil (Prefix/Sufix) von Caption/Name auswerten oder ableiten und den Typ prüfen.