Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Impresión (https://www.clubdelphi.com/foros/forumdisplay.php?f=4)
-   -   [SOLUCIONADO] Problema desbordamiento QReports al generar PDF (win10) (https://www.clubdelphi.com/foros/showthread.php?t=93114)

ginobili20 22-05-2018 19:49:07

[SOLUCIONADO] Problema desbordamiento QReports al generar PDF (win10)
 
Hola gente, despues de que se actualizo el windows 10 en varios clientes( se actulizaron tambien opciones de office), dejo de funcionar el TQRPDFDocumentFilter(es de quickreport) para guardar en formato PDF un reporte.
Me paso en 3 clientes luego de la actualizacion.
el sistema esta en delphi 7, si alguno tiene algun dato o le paso se agradece.
Saludos

Casimiro Notevi 22-05-2018 20:45:42

Se ve que esa actualización está haciendo estragos en multitud de programas. Incluso muchísimos casos en los que estropea el sistema y no pueden ni reinstalarlo.

Yo no uso w10, pero definitivamente, avisaría a todo el mundo para que no lo actualice hasta que lo solucionen.

makividal 22-05-2018 21:30:55

Buenas tardes
Delphi 7 + quickreport +Windows 10: al pasar a pdf el listado da error y se sale del programa, con Windows 7 o Windows server2008
a 2016 va muy bien.
Cansado de buscar y leer soluciones a los muchísimos errores de las actualizaciones del Windows 10.

JuanPa 23-05-2018 18:26:54

Cita:

Empezado por ginobili20 (Mensaje 526455)
Hola gente, despues de que se actualizo el windows 10 en varios clientes( se actulizaron tambien opciones de office), dejo de funcionar el TQRPDFDocumentFilter(es de quickreport) para guardar en formato PDF un reporte.
Me paso en 3 clientes luego de la actualizacion.
el sistema esta en delphi 7, si alguno tiene algun dato o le paso se agradece.
Saludos

Buenos dias,

Igualmente tengo el mismo problema al exportar un reporte a pdf con QuickReport en Windows 10. Lo que puedo agregar es que la exportación funciona bien cuando el reporte tiene una sola página pero se cae cuando el reporte tiene mas de una página. Se cae exactamente en esta instrucción: TCustomQuickrep.ExportToFilter(TQRExportFilter)

ginobili20 23-05-2018 18:31:04

Gracias por contestar gente... la verdad no se como resolverlo porque hasta el momento no hay solucion.

adebonis 24-05-2018 09:54:04

Hola a todos.

Delphi2007 + quickreport +Windows 10: Pasa exactamente igual al generar reportes en pdf. Los clientes ya han empezado a quejarse.

Me parece que Quickreport utiliza la carpeta de archivos temporales de Widows. ¿Podria ser que hubieran cambiado los permisos de esta carpeta?

Si alguien tiene una solución, por favor, compartirla.

Saludos.
Adolfo de Bonis

gguerrini 28-05-2018 19:17:52

Delphi 7 + QReport + Windows 10
 
Tenemos el mismo problema, alguien encontró alguna solución. Lo trato por código mandar a la impresora de "Microsoft to PDF" pero hace agua.
Cualquier ayuda se agradece.

josepvila 28-05-2018 20:00:04

Hola,
Esta actualización ...:mad:, teníamos el mismo error en el exporttofilter con delphi 7 y la unica solución que he encontrado después de debugar es poner un try / except en el createreport(false) y parece que funciona.
Espero que le sirva a alguien.

Programa :c:\program files (x86)\borland\Delphi7\Quickrep5\quickRpt.pas
Código Delphi [-]
procedure TCustomQuickRep.ExportToFilter(AFilter : TQRExportFilter);
  ...
      AProgress.Caption := 'Exportando a pdf';
      QRPrinter.Client := AProgress;
    end;
    // egaraset vr 28/05/2018 modificació provisional per error actualització win 10
    try
       CreateReport(false);
    except
    end;
  finally
    QRPrinter.Free;
    if ShowProgress then
            AProgress.Free;
  end;
...

Saludos

bucanero 28-05-2018 20:13:20

hola a todos,

con esta actualización tan agresiva de windows yo también estoy teniendo problemas, aunque son solo con algunos equipos, (que no he podido determinar porque unos si y otros no, siendo prácticamente idénticos).

El problema es de acceso a nivel de windows a carpetas compartidas en red. Incluso a veces accede una vez y al momento ya no se puede volver a acceder.

Con esta solución que proponen en el foro de MICROSOFT, en algunos equipos si he conseguido solventar los problemas, pero para otros no ha podido ser
https://social.technet.microsoft.com...itprogeneralES

Tras múltiples intentos de solución, el problema que hemos detectado es que al intentar acceder a la ruta de red mediante el nombre del PC y a veces no es en el primer intento, se produce un error de permisos, denegando el acceso a la carpeta. La solución encontrada hasta ahora, pasa por acceder directamente mediante la IP local del equipo en vez de con el nombre de equipo, pero para eso ha sido necesario asignar a los equipos IP fijas. Después de aplicar esta solución parece que ya no han vuelto a tener problemas.

Espero que les pueda ayudar con esta solución.
Un saludo

gguerrini 28-05-2018 22:43:40

Que complicado !!!!!
 
Hola a Todos, Gracias Bucanero por tu respuesta, estas seguro que es tan complicada la solución ??? No has encontrado algo mas sencillo, lo digo por la cantidad de las maquinas en red, usar el ping y ponerles fijo es demasiado. Es una locura, pero convendrá actualizar el QReport ??? o cambiar de Re porteador, en las nuevas versiones de delphi esta por defecto el FastReport. Que les parece ???? Muchas Gracias por su respuesta.

JuanPa 28-05-2018 23:58:45

QuickReport y Windows 10
 
Ciertamente capturando la excepcion en el procedimiento ExportToFilter la aplicacion no se cierra pero finalmente el pdf que se crea no se crea bien ya que al intentar abrirlo muestra el mensaje "There was an error opening this document. The file is damaged and could not be repaired".

Casimiro Notevi 29-05-2018 00:21:44

Cita:

Empezado por JuanPa (Mensaje 526624)
Ciertamente capturando la excepcion en el procedimiento ExportToFilter la aplicacion no se cierra pero finalmente el pdf que se crea no se crea bien ya que al intentar abrirlo muestra el mensaje "There was an error opening this document. The file is damaged and could not be repaired".

Lo único que se logra es que no avise de ningún error, pero no funciona con eso.

manelb 29-05-2018 08:47:08

Nosotros estamos en la misma situación.


Lo he probado con una versión trial de Delphi Berlin y QuickReport(6.0) y parece que la exportación a pdf funciona bien.
Pero nuestros programas creo que utilizan la versión 3.5 o 4 de QuickReport(no lo tengo ahora a mano) y falla también.

Saludos

adebonis 29-05-2018 11:03:51

Hola.

Estoy usando delphi 2007 y QuickReport 4.05.

La versión 6 de QuickReport solo está disponible a partir de Delphi XE2. ¿Alguien sabe si QuickReport 5 también falla en la exportación a pdf?

A ver si deberemos cambiar a Rave Reports...

Un saludo.
Adolfo de Bonis

Casimiro Notevi 29-05-2018 11:19:37

Cita:

Empezado por adebonis (Mensaje 526642)
A ver si deberemos cambiar a Rave Reports...

En teoría es problema de la actualización de w10, ya que son infinidad de problemas los que está generando a todo el mundo y con montones de programas distintos.

HccSoft 29-05-2018 16:36:43

A mi me ocurre igual. Delphi 7 con QR y de golpe el software se cierra al intentar generar cualquier PDF.

gguerrini 30-05-2018 15:20:49

Estamos haciendo de tod un poco para encontrarle la vuelta, otra que me di cuenta es que con la nueva actualizacion no me deja cambiar la impresora por defecto por codigo tradicional como siempre. Ya hice un programa que lo hace sobre windows 7 y funciona perfecto. Alguien tiene algun codigo que no sea cambiando el indice de la impresora ????
Dentro del mismo tema estube controlando los PDF que genera con error, comparando el mismo archivo hecho en windows 7, es como que los inicializa igual y al final no lo puede terminar de cerrar. Le pegue del archivo que genere en windows 7 y magicamente el PDF se puede leer correctamente. Que loco ???
Y otra es que los archivos no se pueden guardar en cualquier parte del disco, es como que ha modificado los permisos y la seguridad. Que locura. HELP !!!!!

JuanPa 31-05-2018 18:52:54

Finalmente parece que encontramos la solucion al problema de exportar el reporte a pdf en windows 10. Vale indicar que el problema se produce por el tipo de letra que en el caso de mi reporte utilizaba "Arial" y lo he cambiado por otro tipo de letra y ha funcionado correctamente. Tambien hay que corregir la siguiente linea en el archivo QRPDFFilt.pas del QuickReport.

En esta sentencia ntabs:=cvtInt(Buff, 4); es donde se cae por lo cual hay que cambiarlo por lo siguiente:
Código Delphi [-]
if (FontName='Arial') then
  ntabs:=0
else
  ntabs:=cvtInt(Buff, 4);
Espero que puedan resolverlo con lo indicado.
Saludos.

gguerrini 01-06-2018 15:44:34

Hola Buenos Dias, nos dejaste con la intriga por que fuente la cambiaste, porque antes no funcionaba otra font y decian que habia que ponerle ARIAL ???? Muchas Gracias. Saludos.

JuanPa 01-06-2018 17:34:20

Yo lo cambie de "Arial" a "Courier New" que es el tipo de letra que en mi caso permite mantener centralizados los controles ya que imagino que con otro tipo de letra puede descuadrarse el reporte y tocara modificar el tamaño, la posiciónde los controles, etc.


La franja horaria es GMT +2. Ahora son las 11:45:19.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi