como acceder a propiedades de objetos en reporte CrystalReports
Publicado por Jorge (56 intervenciones) el 06/06/2011 18:56:25
Como puedo acceder a un objeto que esta en mi reporte de crystal reports ?
por ejemplo tengo un campo en mi reporte llamado "NombreCliente" pero quiero cambiarle por decir el tipo de fuente o el tamaño de la letra, o las coordenadas x,y, como accedo a esa propiedad mediante visual basic?
el codigo que uso es el siguiente usando CRYSTAL REPORTS 9, pero si saben alguna solucion en CR10 o CR11 no problemo o si saben algun lugar donde encotrar la ayuda del control activex de crystal, que no lo encuentro por ningun lado:
gracias por su ayuda
'-------------------------------------------------------------------
'defino mis variables de aplicacion, reporte y subreporte
Dim crApp As CRAXDRT.Application
Dim crReport As CRAXDRT.Report
Dim crSubReport As CRAXDRT.Report
'defino mis variables de listadeparametros y el parametro seleccionado
Dim crParamDefs As CRAXDRT.ParameterFieldDefinitions
Dim crParamDef As CRAXDRT.ParameterFieldDefinition
Private Function ImprimirReporte(CABECERAREG As Recordset)
Set crApp = New CRAXDRT.Application
Set crReport = New CRAXDRT.Report
Set crSubReport = New CRAXDRT.Report
'asigno mi reporte y el subreporte incluido dentro de reporte principal
Set crReport = crApp.OpenReport(App.Path & "\Rpt\Guia.rpt", 1)
Set crSubReport = crReport.OpenSubreport("DETALLE")
crReport.Database.SetDataSource CABECERAREG
crSubReport.Database.SetDataSource DE.rsPBusCodGuiaDet
'ahora recorro la lista de parametros de mi reporte y asigno parametro por parametro
Set crParamDefs = crReport.ParameterFields
For Each crParamDef In crParamDefs
****Select Case crParamDef.ParameterFieldName
****Case "Titulo"
***********crParamDef.AddCurrentValue (TITULO)
****End Select
Next
'pero asi como accedo a los parametros COMO ACCEDO A LOS OBJETOS, O CAMPOS EN EL REPORTE???
'imprimo
crReport.PrintOut
Set crSubReport = Nothing
Set crReport = Nothing
Set crApp = Nothing
etc...
end function
por ejemplo tengo un campo en mi reporte llamado "NombreCliente" pero quiero cambiarle por decir el tipo de fuente o el tamaño de la letra, o las coordenadas x,y, como accedo a esa propiedad mediante visual basic?
el codigo que uso es el siguiente usando CRYSTAL REPORTS 9, pero si saben alguna solucion en CR10 o CR11 no problemo o si saben algun lugar donde encotrar la ayuda del control activex de crystal, que no lo encuentro por ningun lado:
gracias por su ayuda
'-------------------------------------------------------------------
'defino mis variables de aplicacion, reporte y subreporte
Dim crApp As CRAXDRT.Application
Dim crReport As CRAXDRT.Report
Dim crSubReport As CRAXDRT.Report
'defino mis variables de listadeparametros y el parametro seleccionado
Dim crParamDefs As CRAXDRT.ParameterFieldDefinitions
Dim crParamDef As CRAXDRT.ParameterFieldDefinition
Private Function ImprimirReporte(CABECERAREG As Recordset)
Set crApp = New CRAXDRT.Application
Set crReport = New CRAXDRT.Report
Set crSubReport = New CRAXDRT.Report
'asigno mi reporte y el subreporte incluido dentro de reporte principal
Set crReport = crApp.OpenReport(App.Path & "\Rpt\Guia.rpt", 1)
Set crSubReport = crReport.OpenSubreport("DETALLE")
crReport.Database.SetDataSource CABECERAREG
crSubReport.Database.SetDataSource DE.rsPBusCodGuiaDet
'ahora recorro la lista de parametros de mi reporte y asigno parametro por parametro
Set crParamDefs = crReport.ParameterFields
For Each crParamDef In crParamDefs
****Select Case crParamDef.ParameterFieldName
****Case "Titulo"
***********crParamDef.AddCurrentValue (TITULO)
****End Select
Next
'pero asi como accedo a los parametros COMO ACCEDO A LOS OBJETOS, O CAMPOS EN EL REPORTE???
'imprimo
crReport.PrintOut
Set crSubReport = Nothing
Set crReport = Nothing
Set crApp = Nothing
etc...
end function
Valora esta pregunta
0