Código Delphi [-]for i := 0 to dm.DETALLE_REMICOM.RecordCount - 1 do begin //....
for i := 0 to dm.DETALLE_REMICOM.RecordCount - 1 do begin //....