Código Delphi [-] ::::: DataModule1.UniQueryConsultaDOC.Open; // Agrega estas dos líneas *********************** DataModule1.UniQueryConsultaDOC.Last; DataModule1.UniQueryConsultaDOC.First; // ******************************************* for i:= 0 to DataModule1.UniQueryConsultaDOC.RecordCount-1 do begin ::::::
::::: DataModule1.UniQueryConsultaDOC.Open; // Agrega estas dos líneas *********************** DataModule1.UniQueryConsultaDOC.Last; DataModule1.UniQueryConsultaDOC.First; // ******************************************* for i:= 0 to DataModule1.UniQueryConsultaDOC.RecordCount-1 do begin ::::::