Evenement Onprint d'un composant QuickReport

Signaler
Messages postés
63
Date d'inscription
lundi 29 avril 2002
Statut
Membre
Dernière intervention
7 mars 2005
-
Messages postés
4297
Date d'inscription
samedi 19 janvier 2002
Statut
Modérateur
Dernière intervention
9 janvier 2013
-
Voilà l'événement Onprint ne marche pas quand j'ai plusieurs enregistrements dans mon OracleDataSet : il garde en mémoire le dernier enregistrement, et l'applique pour tous les enregistrements de mon oracledataset.

Est-ce que vous avez déjà constaté ceci ?

7 réponses

Messages postés
4297
Date d'inscription
samedi 19 janvier 2002
Statut
Modérateur
Dernière intervention
9 janvier 2013
31
Qu'as-tu mis comme code dans cet évènement ?

May Delphi be with you
Messages postés
63
Date d'inscription
lundi 29 avril 2002
Statut
Membre
Dernière intervention
7 mars 2005

if OracleDataSet isEmpty then begin
QRLibelle.Caption := 'message'
end
else begin
QRLibelle.Caption := OracleDataSetMonChamp.AsString
end;

Apparemment ce n'est pas possible.
Messages postés
4297
Date d'inscription
samedi 19 janvier 2002
Statut
Modérateur
Dernière intervention
9 janvier 2013
31
Si je comprends bien, tu vérifies si l'ensemble de données est vide pour changer le contenu du QrLabel.

Or, dans l'évènement OnPrint, tu reçois comme paramètre Value de type string, qui correspondant à la valeur du champ de l'ensemble de données.
Le code à mettre est tout simplement :

if Value = EmptyStr then
Value := 'Message';
Ce qui a pour effet de s'adapter à la valeur contenue dans le champ à chaque enregistrement.

May Delphi be with you
Messages postés
4297
Date d'inscription
samedi 19 janvier 2002
Statut
Modérateur
Dernière intervention
9 janvier 2013
31
Voir aussi la FAQ Quick report sur le site QbSoftware.

Sue cette page, on trouve aussi un lien pour télécharger le manuel/tutorialde QuickReport.

May Delphi be with you
Messages postés
4297
Date d'inscription
samedi 19 janvier 2002
Statut
Modérateur
Dernière intervention
9 janvier 2013
31
Voir aussi la FAQ Quick report sur le site QbSoftware.

Sue cette page, on trouve aussi un lien pour télécharger le manuel/tutorialde QuickReport.

May Delphi be with you
Messages postés
63
Date d'inscription
lundi 29 avril 2002
Statut
Membre
Dernière intervention
7 mars 2005

Est-ce que cela marche pour n'importe quel composant ?

(je pense en particulier au QRDBtxt)
Messages postés
4297
Date d'inscription
samedi 19 janvier 2002
Statut
Modérateur
Dernière intervention
9 janvier 2013
31
Dans la mesure où le composant quelconque peut gérer un évènement OnPrint, oui.

May Delphi be with you