cannot focus a disabed or invisible window en creación de formulario

[OlmoJorge]

Hola
He encontrado la respuesta!!

Resulta que si tienes programados eventos OnChange en componentes enganchados a la BdD, debes asegurarte antes de hacer cualquier acción, de que el DataSet está en edición. De no ser así, da este error.
En mi caso tenía esto:

Código Delphi [-]
procedure TFFichaContacto.spP08_VD_02Change(Sender: TObject);
begin
  CompruebaP08_01;
end;

spP08_VD_02Change es un SpinEdit contra la BdD.
Pues basta con hacer esto:

Código Delphi [-]
procedure TFFichaContacto.spP08_VD_02Change(Sender: TObject);
begin
  if not (DMConexion.qCliente.State in dsEditModes) then exit;
  CompruebaP08_01;
end;

Saludos. Jorge