setfocusメソッドはコントロールにフォーカスをあてますが、この逆、現在キーボード入力を受け付けているコントロールの名前(クラス名ではなく)を得るにはどうすればいいのでしょうか?
TForm.ActiveControl じゃないですか
ActiveControl.nameで得られました。うんと様ありがとうございました。
※作成する前に利用規約をご確認ください。