dbgrid con 2 consultas mas

[ralf8727]

buen dia o noche.

me podrian auxiliar con esta consulta.

tengo un form con 3 dbgrid el primero es el que maneja la informacion principal, en el segundo de muestra informacion del registro principal y en el tercero se muestra si tiene servicios activos.

todo se consulta con un campo generado apartir de un numero se derie mas un numero unico.

y funciona bien hasta que se ejecuta un bucle el problema es que cuando recorre la base de datos el form no se puede cerrar mover o minimizar.

este es el codigo que utilizo para generar las consultas y tiene que estar erecorriendo la tabla siempre porque nada mas es para que vean el estado de los registros.

Código Delphi [-]
label
ls;
begin

ls;
while not vei.Eof do


vei.First;
begin


AUTORIZACION.Close;
AUTORIZACION.SQL.Clear;
AUTORIZACION.SQL.Add('SELECT * FROM AUTORIZACIONES WHERE NORDEN=:NORDEN');
AUTORIZACION.Parameters.ParamByName('NORDEN').Value:=TRIM(vei.FieldByName('NORDEN').Text);
AUTORIZACION.ExecSQL;
AUTORIZACION.Open;

vei.Next;

Application.ProcessMessages;

end;

  goto ls;

end;

espero me puedan ayudar y gracias