FiveTech Support Forums

Hola foro,

Tengo el siguiente dilema que no he podido resolver,,,
Genero un cierre diario de mi sistema donde saco alrededor de unos 20 reportes, bueno esos reportes ya los copie a una carpeta que yo genero con nombre especificos y extension .emf, (porque? porque el proceso nomas lo ejecuto 1 vez) esto lo hago por si al usuario se le pasa imprimir algun reporte, ya que siempre lo envio al preview, el caso es que ya tengo los .emf generados y copiados. ahora viene el dilema:

quiero esos archivos .emf volver a cargarlos en un preview por si los quiere reimprimir,
gracias
saludos
pak.o

Hola Francisco:

Yo lo que haría es que generara PDF no EMF por varios motivos:

1.- No requiere de una modificación amplia de la clase TPreview: eso conllevaría crear métodos nuevos para cargar/guardar los EMF, en el caso, que estemos ya en un report guardar/restaurar el actual, etc, etc, es decir, bastante trabajo para algo que tiene ya solución usando otro metodo de trabajo.

2.- Si generas PDF no tienes necesidad de usar de nuevo la clase TPreview, se pueden abrir desde cualquier opción del programa simplemente llamando al fichero.

3.- Dicho PDF, lo puedes enviar por e-mail, FTP, etc.

4.- PDf, compatibilidad entre S.O y No requiere de software, programa, función, clase, rutina asociada.

5.- etc

Yo he subido unas modificaciones de la clase TPreview para FWH1109, se puede hacer unas pequeñas modificaciones para que haga copias de cada report en formato PDF en cada report, controlado con una DATA por ejemplo ::lBackup, así cada uno puede elegir si se crean backup (pdf) o no.

http://fivetechsupport.com/forums/viewtopic.php?f=6&t=22422&start=15

Cuando tenga un rato, voy a añadir nuevos métodos en la clase TPreview para poder enviar dicho informe vía e-mail.

Un saludo
JLL

http://office.microsoft.com/pt-br/excel ... 14103.aspx

Hola tocayo, mira si te sirve esto.

viewtopic.php?f=6t=13291hilit=oldmetafile#p67841
Saludos

&&

Gracias por su cooperacion
ya resolvi utilizar el preview, y si me carga los archivos que guarde, asi como dice mi tocayo,
el problema viene cuando cierro el preview me borra mis archivos, jajaja
estoy tratando de modificar printer.prg con una variable para validar si borra o no los archivos, pero me los sigue borrando, algun tiro por donde pueda evitar que me borre los archivos.

efectivamente tocayo, veo que usas rpreview(oprn) y veo que no finalizas oprn:end() o endprint,,, te has fijasdo si te elimina tus archivos emf guardados?

adjunto mi pequeño codigo

aDir := DIRECTORY(oApp:cDirAudi) // cargo mis archivos .emf
oPrn:=PrintBegin("Re-Impresión de Auditoría",.F.,.T.,,.T.)
oPrn:SetPage(1) // Tamaño Carta
oPrn:SetPortrait() // Orientacion Vertical

FOR x := 1 TO LEN(aDir)
AADD( oPrn:aMeta, oApp:cDirAudi + aDir[x,1] ) // agrego los .emf a aMeta
NEXT

RPreview(oPrn)
ENDPRINT
oPrn:End()

gracias a todos

bien pues caso solucionado!!!
gracias por su cooperacion
le meti mano a la printer, le agregue una variable lDeleteFile y desde oPrn:lDeleteFile:=.F. decido si elimina los archivos .emf
saludos
pak.o

Francisco Horta wrote:Hola foro,

Tengo el siguiente dilema que no he podido resolver,,,
Genero un cierre diario de mi sistema donde saco alrededor de unos 20 reportes, bueno esos reportes ya los copie a una carpeta que yo genero con nombre especificos y extension .emf, (porque? porque el proceso nomas lo ejecuto 1 vez) esto lo hago por si al usuario se le pasa imprimir algun reporte, ya que siempre lo envio al preview, el caso es que ya tengo los .emf generados y copiados. ahora viene el dilema:

quiero esos archivos .emf volver a cargarlos en un preview por si los quiere reimprimir,
gracias
saludos
pak.o

Hola Antonio,

Como comentario aparte, probablemente a varios de nosotros nos pudiera servir elegir si queremos borrar los archivos .emf generados por los preview, crees que pudiera ser factible agregar esa modificaion por uds. en futuros builds? nos puede ser de utilidad, simple observacion.
Gracias
P@ko