salut
j'aimerais passer des parametres de delphi vers crystal report
j'utilise SetReportVariableValue car j'imagine que c'est ce qu'il faut utiliser en delphi.
mais j'obtiend une erreur du genre "access refusé"
l'etat s'affiche normalement sur crystal report avec les paramètre par defaut.
voici mon code :
Merci de repondre
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36 procedure TFenetre_releve_sequentiel.ImpressionFinishButtonClick( Sender: TObject; var Stop: Boolean); var crReport : IReport; chem: string; begin try Cursor := crHourGlass; chem:=path+'Bulletin_Sequentiel.rpt'; crReport := crApplication.OpenReport(chem, crOpenReportByTempCopy); crReport.SetReportVariableValue('ID_seq',Id_sequence); crReport.SetReportVariableValue('ID_classe',Id_classe); Fenetre_bulletin_sequentiel.Show; Fenetre_bulletin_sequentiel.View_bulletin_sequentiel.ReportSource := crReport; Fenetre_bulletin_sequentiel.View_bulletin_sequentiel.ViewReport; while Fenetre_bulletin_sequentiel.View_bulletin_sequentiel.IsBusy do begin forms.Application.ProcessMessages; end; Cursor := crDefault; crReport._Release; except on E: EOLEException do ShowMessage (E.Message); end; Fenetre_releve_sequentiel.Close; Wizard_releve_sequentiel.ActivePage:=bienvenue; end;
Partager