IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

SDK Discussion :

Delphi 7 + crystal report


Sujet :

SDK

  1. #1
    Futur Membre du Club
    Inscrit en
    Janvier 2010
    Messages
    9
    Détails du profil
    Informations forums :
    Inscription : Janvier 2010
    Messages : 9
    Points : 8
    Points
    8
    Par défaut Delphi 7 + crystal report
    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 :

    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;
    Merci de repondre

  2. #2
    Candidat au Club
    Inscrit en
    Février 2010
    Messages
    2
    Détails du profil
    Informations forums :
    Inscription : Février 2010
    Messages : 2
    Points : 3
    Points
    3
    Par défaut
    Bonjour nraloux

    Citation Envoyé par nraloux Voir le message

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    procedure TFenetre_releve_sequentiel.ImpressionFinishButtonClick(
      Sender: TObject; var Stop: Boolean);
    ..................
     
               crReport.SetReportVariableValue('ID_seq',Id_sequence);
               crReport.SetReportVariableValue('ID_classe',Id_classe);
     
    ....................
    essayez de changer ces deux lignes de code comme suite :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    CRReport1.ParameterFields.Item[1].SetCurrentValue(Id_sequence,$0000000C); 
    CRReport1.ParameterFields.Item[2].SetCurrentValue(Id_classe,$0000000C);
    ici ParameterFields.Item[1] et ParameterFields.Item[1] représente vos deux paramètres 'ID_seq' et 'ID_classe'

    et $0000000C indique le type des paramètres, ici c'est string
    pour plus d'information voir l'unit CRAXDRT_TLB.pas

    voila, j'espère que sa va marcher comme ça

    merci de jeter un coup deuil sur http://www.developpez.net/forums/d88...he-diagrammes/

  3. #3
    Futur Membre du Club
    Inscrit en
    Janvier 2010
    Messages
    9
    Détails du profil
    Informations forums :
    Inscription : Janvier 2010
    Messages : 9
    Points : 8
    Points
    8
    Par défaut
    merci delphinove
    je teste et je vous tiend au courant mais a priori ça devrait marcher

  4. #4
    Futur Membre du Club
    Inscrit en
    Janvier 2010
    Messages
    9
    Détails du profil
    Informations forums :
    Inscription : Janvier 2010
    Messages : 9
    Points : 8
    Points
    8
    Par défaut
    Pour les nombres c'est $00000007

  5. #5
    Candidat au Club
    Inscrit en
    Avril 2010
    Messages
    25
    Détails du profil
    Informations forums :
    Inscription : Avril 2010
    Messages : 25
    Points : 3
    Points
    3
    Par défaut crystal reports
    Bonjour
    je suis débutant.
    j'ai une application sous delphi7 dans une machine les états d'impression fonctionnent bien.
    quand je copie la source du programmes avec l’exécutable dans une autre machine les états d'impression ne fonctionnent plus.
    j'ai appeler celui qui a installer l'application il ma dis il faut introduire le N° de série de Crystal reports?
    Aidez moi SVP

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Delphi Et Crystal Report
    Par amel07 dans le forum Delphi
    Réponses: 1
    Dernier message: 05/04/2007, 01h14
  2. Delphi Et Crystal Report
    Par amel07 dans le forum Bases de données
    Réponses: 1
    Dernier message: 04/04/2007, 17h00
  3. Delphi et Crystal report
    Par moulery dans le forum Delphi
    Réponses: 3
    Dernier message: 15/03/2007, 13h57
  4. [Delphi 7+Crystal Reports XI] - Error 515 dans un rapport
    Par david_chardonnet dans le forum SDK
    Réponses: 1
    Dernier message: 03/04/2006, 11h42
  5. Delphi 7 - Crystal Report : passage de paramètre
    Par mls dans le forum Composants VCL
    Réponses: 2
    Dernier message: 23/06/2005, 16h00

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo