Chicos, Repito, por si no queda claro.
Uds se bajaron el Foxypreviewer de Internet que tiene muchas fallas, al menos a mi me hizo parir bastante... En mi caso modifique los fuentes hasta que funcionaron en un 90% a mi gusto, sin embargo el ejemplo que di funciona a partir de mi fuente y no del fuente original, por lo cual tiene un costo que les puedo pasar por privado si lo necesitan; incluso tengo una breve documentación de como funciona y que le falta para que sea 100% operativo y como le dije por privado a Pablo, si necesitan que ese 10% que falta funcione se los puedo incluir dentro del precio. Saludos, Pancho Córdoba El 27 de agosto de 2013 21:35, Walter Comito <[email protected]>escribió: > A mi no me deja imprimir los reportes si no los tengo en el cliente.**** > > Desde ya están incluidos en el proyecto.**** > > Que estoy haciendo mal.**** > > ** ** > > Gracias**** > > ** ** > > ** ** > > ** ** > > *Walter Cómito***** > > Analista de Sistemas**** > > MP 0397 C.P.C.I.P.C.**** > > ** ** > > *›* * **[email protected]* > > * [email protected]* > > ** ** > > *'** **+54 351 494.4667* > > * 153.292.707* > > * * > > *þ** **www.softram.com.ar*** > > **** > > Q Si no es necesario, no imprima este correo.**** > > Todos somos responsables por el cuidado del medio ambiente.**** > > ** ** > > **** > > *NOTA DE CONFIDENCIALIDAD* > Este mensaje (y sus anexos) es confidencial y puede contener información > de propiedad > exclusiva de Walter Cómito (SRS Sistemas). Si usted ha recibido este > mensaje por error, > por favor comuníquelo inmediatamente a *walter.comito<[email protected]> > **@gmail.com* y tenga la amabilidad > de eliminarlo; no deberá copiar el mensaje ni divulgar su contenido a > ninguna persona.**** > > Muchas Gracias.**** > > ** ** > > *De:* [email protected] [mailto:[email protected]] *En nombre de *francisco > prieto > *Enviado el:* martes, 27 de agosto de 2013 07:52 p.m. > *Para:* GUFA List Member > *Asunto:* [GUFA] FoxyPreviewer**** > > ** ** > > No, el reporte esta dentro del exe. No distribuyo ningun fuente.**** > > ** ** > > Saludos,**** > > ** ** > > Pancho**** > > ** ** > > El 27 de agosto de 2013 19:48, Flores Sistemas (Pablo Flores) < > [email protected]> escribió:**** > > Pancho con eso te incluye los reportes en el .exe?? o tenes que > distribuirlos a los archivos de reportes tambien??**** > > Saludos**** > > Pablo Flores**** > > *From:* francisco prieto <[email protected]> **** > > *Sent:* Tuesday, August 27, 2013 7:35 PM**** > > *To:* GUFA List Member <[email protected]> **** > > *Subject:* [GUFA] FoxyPreviewer**** > > **** > > Pablo, **** > > **** > > Cuando uso Foxypreview lo hago de la siguiente forma:**** > > **** > > Local lcNomReporte**** > > If This.Parent.Parent.pFiltros.opt_valor.Value=1**** > > lcNomReporte="rep_Deriva"**** > > Else**** > > lcNomReporte="rep_Deriva_valor"**** > > Endif**** > > Select cur_rep**** > > Public poAuxiliar**** > > poAuxiliar=Createobject("Custom")**** > > poAuxiliar.AddProperty("Dde",This.Parent.Parent.pFiltros.Txt_Dde.Value)*** > * > > poAuxiliar.AddProperty("Hsta",This.Parent.Parent.pFiltros.Txt_Hsta.Value)* > *** > > Thisform.Nombre_Report=lcNomReporte**** > > Thisform.TituloRepPrev="Informe de Derivadores con OT"**** > > Thisform.UsaFoxyPreviewer()**** > > poAuxiliar=.Null.**** > > Release poAuxiliar**** > > Select cur_rep**** > > **** > > Claro que como podras ver no utililizo el default y modifique el fuente... > **** > > **** > > Te paso ademas el contenido del método UsaFoxyPreviewer**** > > **** > > SET PROCEDURE TO FoxyPreviewer.Prg ADDITIVE **** > > SET STATUS BAR OFF **** > > SET CONSOLE OFF **** > > SET POINT TO ","**** > > SET DECIMALS TO 2**** > > SET SEPARATOR TO "."**** > > SET TALK OFF **** > > **** > > LOCAL loReport as "PreviewHelper" OF FoxyPreviewer.Prg**** > > loReport = CREATEOBJECT("PreviewHelper")**** > > WITH loReport as ReportHelper**** > > IF Thisform.Resumen**** > > .AddReport(Thisform.Nombre_Report,"SUMMARY")**** > > ELSE **** > > .AddReport(Thisform.Nombre_Report)**** > > ENDIF **** > > .cTitle = Thisform.TituloRepPrev **** > > .cLanguage = "ESPANIOL"**** > > TEXT TO lcHTML NOSHOW PRETEXT 3**** > > <HTML><HEAD>**** > > <STYLE></STYLE>**** > > </HEAD>**** > > <BODY bgColor=#ffffff>**** > > <FONT face=Verdana size=2>**** > > To<BR></FONT>**** > > <BR>**** > > <BR>**** > > <FONT face=Verdana size=2>Sincerely</FONT>**** > > <P></P>**** > > <BR>**** > > <HR><STRONG>**** > > <FONT face=Verdana size=1>FoxyPreviewer team.</FONT></STRONG>**** > > <FONT face=Arial color=black size=1><BR>**** > > <FONT face=Verdana>1818 Super Street - Your Home<BR>05432-030 > - Your City - XX</FONT><BR>**** > > <FONT face=Wingdings color=black size=2>(</FONT><STRONG> </STRONG>**** > > <FONT face=Verdana>Phone: 1 11 - 3322.2233 <BR></FONT>**** > > <FONT face=Wingdings color=black size=2>(</FONT> **** > > <FONT face=Verdana>Fax: 2 11 - 3366.6656<BR></FONT>**** > > <FONT face=Wingdings color=black size=2>*</FONT>**** > > <A href="mailto:[email protected]";><FONT face=Verdana> > [email protected]</FONT></A> </FONT>**** > > <BR>**** > > </HTML>**** > > ENDTEXT**** > > **** > > .cEmailBody = lcHTML**** > > .nWindowState=2**** > > .nDockType=0**** > > .RunReport()**** > > ENDWITH **** > > SET POINT TO "."**** > > SET SEPARATOR TO ","**** > > SET TALK OFF **** > > **** > > Sin embargo no te garantizo que esto funcione con la versión bajada de > Internet porque tuve que arreglar varias cosas en medio.**** > > **** > > Pero al menos te doy una punta.**** > > **** > > Saludos,**** > > **** > > Pancho**** > > Córdoba**** > > **** > > **** > > ** ** > > El 27 de agosto de 2013 19:08, Flores Sistemas (Pablo Flores) < > [email protected]> escribió:**** > > ** ** > > Hola... > estoy usando el foxypreviewer en modo completo. En el proyecto tengo > agregados los reportes/etiquetas > pero cuando genero el .exe y lo ejecuto me pide el reporte > Estoy usando vfp9 sp2, tambien ejecuto el foxypreviewercaller.prg en el > programa principal.prg y esta tambien en el proyecto > Gracias > Saludos > Pablo Flores > > > **** > > **** > > ** ** >
