Error de Focus

[ecfisa]

Hola.

Ese error se produce porque estas dándole el foco a algún control que esta inhabilitado o invisible en ese momento, por ejemplo:

WinControl.Enabled := (1 = 2) // alguna condición
...
WinControl.SetFocus

O:

WinControl.Visible := (5 = 2) // alguna condición
...
WinControl.SetFocus

En el trozo de código de tu mensaje pareciera que no esta el error, pero desactivas e inhabilitas algunos controles que podrían darlo luego. Deberías usar break points y hacer trace into para tratar de circunscribir la línea donde se está produciendo.

Saludos