Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Passing Values To Crystal Report
Message
De
08/10/2003 12:44:34
 
 
À
08/10/2003 10:31:21
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire de rapports & Rapports
Divers
Thread ID:
00836160
Message ID:
00836313
Vues:
14
I have to advise against using the ActiveX control. Crystal Decisions recommends against it and it does not ship with Crystal Reports 9.


>I use the crystal activex control and this is what we do:
>
>Public oCrystal
>oCrystal = CREATEOBJECT( 'Crystal.CrystalReport' )
>
>*-- Set Crystal's Default Screen Behaviour...
>oCrystal.ProgressDialog = .T.
>oCrystal.WindowAllowDrillDown = .T.
>oCrystal.WindowControlBox = .F.
>oCrystal.WindowMaxButton = .F.
>oCrystal.WindowMinButton = .F.
>oCrystal.WindowShowCancelBtn = .T.
>oCrystal.WindowShowCloseBtn = .T.
>oCrystal.WindowShowExportBtn = .T.
>oCrystal.WindowShowGroupTree = .T.
>oCrystal.WindowShowNavigationCtls = .T.
>oCrystal.WindowShowPrintBtn = .T.
>oCrystal.WindowShowPrintSetupBtn = .T.
>oCrystal.WindowShowProgressCtls = .T.
>oCrystal.WindowShowZoomCtl = .T.
>oCrystal.WindowShowSearchBtn = .T.
>oCrystal.WindowState = 2
>oCrystal.Destination = 0 && Screen
>
>*-- Tell crystal the report being used...
>oCrystal.ReportFileName = "MyReport.rpt"
>
>*-- Set the Report's Parameters...
>oCrystal.ReportTitle = "My Report"
>oCrystal.ParameterFields( 0) = [cCompanyName;] + (oApp.cCompName) + [;TRUE]
>oCrystal.ParameterFields( 1) = [cStycat1;] + (m.cStyleCat1) + [;TRUE]
>oCrystal.ParameterFields( 2) = [cStycat2;] + (m.cStyleCat2) + [;TRUE]
>
>HTH
Craig Berntson
MCSD, Microsoft .Net MVP, Grape City Community Influencer
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform