1. Accueil
  2. Forum Codes-Sources
  3. Delphi / Pascal

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

Réponse 1 / 7
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
Réponse 2 / 7
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.
Réponse 3 / 7
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
Réponse 4 / 7
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
Réponse 5 / 7
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
Réponse 6 / 7
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)
Réponse 7 / 7
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
Répondre Posez votre question