Cita:
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