Problema con Enable/DisableControls

[kamuspik]

Hola,

estoy teniendo un problema a la hora de usar las instrucciones DisableControls y EnableControls.

Por ejemplo, si tengo una conexión abierta con una TADOQuery y quiero cambiar la SQL si no uso Disable/EnableControls funciona correctamente, pero produce un molesto parpadeo. Para evitar ese parpadeo he utilizado las instrucciones Disable/EnableControls. El problema es que el Grid no muestra datos, aparecen las filas vacías pero te puedes mover en ellas.

Con este simple código también pasa:

Código Delphi [-]
ADOQuery1.Open;

  try
    ADOQuery1.DisableControls;
    ADOQuery1.SQL.Text := 'SELECT TOP 100 * FROM LALBARAN WHERE linea > 1';
    ADOQuery1.Open;
  finally
    ADOQuery1.EnableControls;
  end;

Para confundirme más todavía he comprobado que si en vez de poner estas líneas en FormCreate las pongo en el evento que genera al pulsarse un botón funciona correctamente. ¿Qué estoy haciendo mal?

Muchas gracias por vuestro tiempo,

un saludo