[Efren2006]

Empezado por aledieb

Agrega en el while Application.ProcessMessages;

Código Delphi [-]
       while Not Relacion.eof do
         Begin
         DetDocumento.Insert;
         DetDocumentoNUMLIQUIDA.Value:=RelacionNUMLIQUIDA.Value;
         DetDocumentoTOTLIQUIDA.Value:=RelacionTOTLIQUIDA.Value;
         DetDocumentoPAGODIV.Value:=RelacionPAGODIV.Value;
         DetDocumentoPAGOBOL.Value:=RelacionPAGOBOL.Value;
         DetDocumento.Post;
         Relacion.Next;
         Application.ProcessMessages;
         End;

aledieb Buenos Dias

Gracias por el Aporte

Ya probé esta instrucción

Código Delphi [-]
 Application.ProcessMessages;

y sigo con el mismo Problema,,

Investigare mas con respecto a esa funcion..

Saludos