FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
QuickReport 3.6.2 Prof - PDF
Hola, estoy trabajando con Delphi 6 Enterprise y Quickreport professional 3.6.2, y les escribo para ver si alguien sabe porque sale este error. Con Delphi 6 corriendo, al guardar un listado en formato PDF sale un error que el debugger señala con el siguiente mensaje:
“Project Visor.exe raised exception class ERangeError with message ‘Range check error’. Process stopped. Use Step or Run to continue.” Y a continuación, abre la Unit que tiene el error QRPDFFilt y en el procedimiento: procedure TQRPDFDocumentFilter.TextOut(X, Y : extended; Font : TFont; BGColor : TColor; Alignment : TAlignment; Text : string); Marca la línea 432 como causante del error: strpcopy( fpdfitem.Fontname,Font.Name ); fpdfitem.fontsize := Font.Size; fpdfitem.rgbfcolor.blue := getBvalue(font.color); fpdfitem.rgbfcolor.red := getRvalue(font.color); fpdfitem.rgbfcolor.green := getGvalue(font.color); fpdfitem.fbold := fsBold in font.Style; Lo curioso, es que hasta ayer no me daba este error, y que en otra aplicación que tengo tampoco me da este error, veo el código de ambas aplicaciones y no aprecio diferencias entre el código de una aplicación y la otra pero una me da error y la otra no. Tal vez alguien pueda indicarme por que se produce un error del tipo ‘Range check error’, o alguna pista para resolver esta situación. Un saludo Jose Manuel |
#2
|
|||
|
|||
Hola, el problema era un "bug" en el fichero. Hice la consulta a QSOFT y me enviaron el fichero corregido que producia el error.
La respuesta de Qsoft fue esta: ................................................... Hi, this error is caused when one of the colours in the report is in the system palette. The fix is to add a line like this before the colour decomposition like this - if Font.Color < 0 then Font.color := font.color and $FFFFFF; The attached version of qrpdffilt.pas has the corrections. .................................................... Un saludo a todos. Jose Manuel |
|
|
|