Не совсем понятно как работает код, предлагаемый вами, т. к. мои знания Delphi пока минимальны. Но все равно спасибо.

Выдает ошибку: Cannot focus a disabled or invisible window