Error (6) no puede borrar un ENHANCED METAFILE (Solucionado)

[Blessed]

Saludos:

En cierta aplicacion me dio, este error; pero lei en el foro que al borrar el archivo Log de error esto se solucionaba; pero no fue asi y se me da en otros programas asi que de antemano gracias por su ayuda.
En el archivo log no hay rastro del error, solo muestra la ventana de error y el programa se detiene, le das "OK", y el programa, sigue; quedan preguntas como esta el reporte completo?, como se puede evitar ya que se torna molesto, porque sucede en momentos inesperados

Estoy Usando FiveWin 8.01 y xHarbour 1.1.0 (Simplex)

Saludos desde Honduras

[Armando]

Blessed:

En 32 bits me ha pasado esa situación y despues de mucho buscar logre detectar la razón, resulta que eso se da cuando sobrepasas el final de la página, intenta haciendo el márgen inferior más amplio.

Creo que con un dibujo me explicaré mejor.

con esta situación es cuando te da el error:

renglon que imprimes
otro renglon que imprimes
------------------------------------- <- esto es el final de la página


Fijate que el texto "otro renglón que imprimes" esta casí al final de la página, si amplias el margen inferior debe quedar la impresión así

renglon que imprimes
<- Espacio en blanco del nuevo margen
------------------------------------- <- esto es el final de la página

titulos
encabezados
================================
titulos de las columnas
===============================

otro renglon que imprimes

Ojalá me haya explicado

Saludos

[Blessed]

Saludos y Gracias Armando.

Probare hacer el margen inferior mas amplio, asi como lo recomiendas.

Saludos desde Honduras.

[Blessed]

Sigo experimentando este problema solo que hoy en la clase TReport.

Hago un sumario al final del reporte, y me da el error.

He intentado con algo que encontre en otro post:

Code: Select all  Expand view  RUN

if( oInforme:NeedNewPage(),;
           (oInforme:EndPage(),;
            oInforme:StartPage()), NIL  )

Tanto al inicio de la impresion de cada linea del sumario, como despues y siempre me da el error

Saludos desde Honduras

[wmormar]

Blessed,

A mi me ha pasado, cuando coloco un ENDPAGE sin haber iniciado una pagina con PAGE.

por ahi podria ir los tiros

[Blessed]

Gracias Willian:

Ya lo he solucionado, y no ha sido por la falta del ENDPAGE, al menos en este caso
Tengo un reporte de facturas con un Sumario al final, es ahi donde detecte el error, como acote antes hice uso del metodo NeedNewPage().

Pero tomando algo de aui y alla en el foro di con la solucion:

Code: Select all  Expand view  RUN

STATIC FUNCTION Rep_OverFlow( oInforme )
   IF oInforme:nRow + oInforme:nStdLineHeight >= oInforme:nBottomRow
      oInforme:EndPage()
      oInforme:StartPage()
   ENDIF
   RETURN NIL


Antes de insertar cada linea en el sumario, verifico si el valor de row mas el ancho de la linea no sobrepase el valor de la ultima linea del reporte.
Es curioso ya que he hecho sumarios al final de un grupo (ENDGROUP) es decir dentro del cuerpo del reporte y no me da este error de METAFILE, en cambio al usar el sumario al final del reporte ON END SumarioFact(), se me daba el error.

Saludos desde Honduras