Xailer & OZ Software

Fredy,
¿Dónde puedo ver un ejemplo de uso de Xailer con Fast-Reports?
Me interesa verlo tanto para ADO como para dbfs normales.
Saludos,
José Luis Capel

Saludos:
Hay un ejemplo en el foro normal del dí­a 30/06/2007.
José Ramón Castro.
José Luis Capel - Aicom escribió:
> Fredy,
>
> ¿Dónde puedo ver un ejemplo de uso de Xailer con Fast-Reports?
>
> Me interesa verlo tanto para ADO como para dbfs normales.
>
> Saludos,
> José Luis Capel
>
>

Jose Luis, Saludandote.
Este ejemplo lo tome de este foro, creo que lo puso Fredy, solo lo adapte a
mis necesidades.
en un boton pones lo siguiente
METHOD mi_boton( oSender ) CLASS articulos
LOCAL oError,lResult,cTITULO,cConection
//Esta linea es para dbfs y tienes que instalar los rutimes de visual foxpro
para que te agregue los ado
LOCAL strConecta := "Provider=VFPOLEDB.1;Data Source=.datos"
::oFR := CreateObject( "FastReport.TfrxReport" )
::oDBFR := CreateObject( "FastReport.TfrxADODatabase")
// Objeto para el DataSet que estara Visible en el Diseñador
::oQRY := CreateObject( "FastReport.TfrxADOQuery")
// Establecer las Propiedades del Objeto Base de Datos (TfrxADODatabase)
::oDBFR:ConnectionString :=strConecta
::oDBFR:LoginPrompt := .f.
::oDBFR:Connected := .t.
::oQRY:DataBase := ::oDBFR
// Este es el nombre de la consulta que automaticamente lo tomara en
FastReport
::oQRY:Name := "CatalogodeClientes"
::oQRY:Query := "select * from articulos order by componente,bloque"
// Encadenar el Obejto ::oQRY al Objeto Reporte (::oFR)
::oFR:SelectDataset(.t.,::oQRY)
::cTITULO:="'CATALOGO DE ARTICULOS'" // Se tienen que pasar en dobles
comillas
::oFR:Addvariable("Variables de Xailer","Titulo",::cTITULO)
::oFR:LoadReportFromFile (".Reportesarticulos.fr3")
::oFR:SetVariable("Titulo",::cTITULO)
::oFR:ShowReport()
RETURN Nil
De igula forma te envio el ejemplo completo.
Insisto este ejemplo fue proporcionado en este foro, por tal merece un gran
reconocimiento al que lo proporcionó.
Dios les bendiga


Attached files FastReportDemo.zip (2.8 KB)Â

José Ramón, Pedro,
Muchas gracias a ambos. Voy a comenzar a mirar vuestras indicaciones.
Solo me queda una cuestión por resolver:
De las múltiples versiones que tiene FastReports... ¿cual instalar? Es que
veo que hay para BC, para VCL, para... en fin... no se cual.
Saludos y gracias,
José Luis Capel
"José Luis Capel - Aicom" <jose.luis@iaicom.com> escribió en el mensaje
news:[email=47134082@ozsrv2.ozlan.local...]47134082@ozsrv2.ozlan.local...[/email]
> Fredy,
>
> ¿Dónde puedo ver un ejemplo de uso de Xailer con Fast-Reports?
>
> Me interesa verlo tanto para ADO como para dbfs normales.
>
> Saludos,
> José Luis Capel
>

Hola Jose Luis !
El Dia 29 de Junio puse un pequeño ejemplo de FastReport y Xailer, ahi viene
que versión tienes que bajar.
Saludos....
"José Luis Capel - Aicom" <jose.luis@iaicom.com> escribió en el mensaje
news:4714675d$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
> José Ramón, Pedro,
>
> Muchas gracias a ambos. Voy a comenzar a mirar vuestras indicaciones.
>
> Solo me queda una cuestión por resolver:
>
> De las múltiples versiones que tiene FastReports... ¿cual instalar? Es
> que veo que hay para BC, para VCL, para... en fin... no se cual.
>
> Saludos y gracias,
> José Luis Capel
>
> "José Luis Capel - Aicom" <jose.luis@iaicom.com> escribió en el mensaje
> news:[email=47134082@ozsrv2.ozlan.local...]47134082@ozsrv2.ozlan.local...[/email]
>> Fredy,
>>
>> ¿Dónde puedo ver un ejemplo de uso de Xailer con Fast-Reports?
>>
>> Me interesa verlo tanto para ADO como para dbfs normales.
>>
>> Saludos,
>> José Luis Capel
>>
>
>

Pedro,
Una pregunta.
Veo que pones un proveedor oledb de Foxpro. ¿Puede leer í­ndices CDX de
xHarbour?
--
Saludos,
José Luis Capel
www.capelblog.com vuelve a estar online!!
"PEDRO DE LEON RODAS" <deleonpe@terra.com.mx> escribió en el mensaje de
noticias news:[email=47142be6@ozsrv2.ozlan.local...]47142be6@ozsrv2.ozlan.local...[/email]
> Jose Luis, Saludandote.
>
> Este ejemplo lo tome de este foro, creo que lo puso Fredy, solo lo adapte
> a mis necesidades.
>
> en un boton pones lo siguiente
> METHOD mi_boton( oSender ) CLASS articulos
>
> LOCAL oError,lResult,cTITULO,cConection
>
> //Esta linea es para dbfs y tienes que instalar los rutimes de visual
> foxpro para que te agregue los ado
>
> LOCAL strConecta := "Provider=VFPOLEDB.1;Data Source=.datos"
>
> ::oFR := CreateObject( "FastReport.TfrxReport" )
> ::oDBFR := CreateObject( "FastReport.TfrxADODatabase")
>
> // Objeto para el DataSet que estara Visible en el Diseñador
>
> ::oQRY := CreateObject( "FastReport.TfrxADOQuery")
>
> // Establecer las Propiedades del Objeto Base de Datos (TfrxADODatabase)
> ::oDBFR:ConnectionString :=strConecta
> ::oDBFR:LoginPrompt := .f.
> ::oDBFR:Connected := .t.
> ::oQRY:DataBase := ::oDBFR
>
> // Este es el nombre de la consulta que automaticamente lo tomara en
> FastReport
> ::oQRY:Name := "CatalogodeClientes"
> ::oQRY:Query := "select * from articulos order by componente,bloque"
>
> // Encadenar el Obejto ::oQRY al Objeto Reporte (::oFR)
>
>
> ::oFR:SelectDataset(.t.,::oQRY)
>
> ::cTITULO:="'CATALOGO DE ARTICULOS'" // Se tienen que pasar en dobles
> comillas
> ::oFR:Addvariable("Variables de Xailer","Titulo",::cTITULO)
> ::oFR:LoadReportFromFile (".Reportesarticulos.fr3")
> ::oFR:SetVariable("Titulo",::cTITULO)
> ::oFR:ShowReport()
>
> RETURN Nil
>
>
> De igula forma te envio el ejemplo completo.
>
> Insisto este ejemplo fue proporcionado en este foro, por tal merece un
> gran reconocimiento al que lo proporcionó.
>
> Dios les bendiga
>
>
>
>
>