Pregunta: | 64097 - MOSTRAR DATOS DELPHI |
Autor: | Tatiana Guavita |
Buenas tardes a todos. Tengo un inconveniente estoy tratando de mostrar en dos hojas (vista impresion) los varios registros que estan en una tabla ahora en la primera van hasta 5 registros , en la segunda van desde los 6 hasta los 10 (anexos) pero hay un lio con los anexos ya que me muestra el ultimo dato de la primera hoja por el numero de datos que deberian ir en la segunda. lo que estoy usando para la segunda es: with MdtFormulario.QryIdUsuario do begin NoRec := RecordCount; if FindFirst and (NoRec > 5) then begin MoveBy(6); QRLabel88.Caption := FieldByName(´TIPO').AsString; QRLabel89.Caption := FieldByName('IDT_NUMERO_DOCUMENTO').AsString; QRLabel90.Caption := FieldByName('NOMBRE').AsString; QRLabel99.Caption := FieldByName('IDT_CODIGO_ASIGNADO').AsString; QRLabel100.Caption := FieldByName(CODIGO').AsString; QRLabel101.Caption := FormatFloat('#,##0.00', FieldByName('IDT_VALOR').AsFloat); if (NoRec > 6) then begin Next; .... end; FindFirst; MoveBy(6); end; Pero no funciona como deseaba, y apenas estoy iniciando en delphi me podrian ayudar. Gracias; |