Générer du PDF avec QuickReport

Bonjour;

J'utilise la version 3.62 de Quickreport et j'essaye de générer un fichier pdf à partir d'un doc QRP stocké dans une base de données et ceci en utilisant le composant "TQRPDFDocumentFilter".
Mais ca ne fonctionne pas car il ne se passe rien.
Ci-joint mon code :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14

procedure TForm1.Button1Click(Sender: TObject); var FichierPDF : TQRPDFDocumentFilter; qrp : TQRPrinter; ApplicationPath : string; begin ApplicationPath := ExtractFilePath(Application.ExeName); FichierPDF := TQRPDFDocumentFilter.Create(ApplicationPath +'Report.pdf'); qrp := TQRPrinter.Create(nil); qrp.Load('D:\Temp\etat.qrp'); qrp.ExportToFilter(FichierPDF); FichierPDF .free; end;

---

Merci;

salut

as tu transformé les composants de ton document ?

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

Procedure ExporteDocQr(quickrep : TquickRep;Printer : Tqrprinter; nom : String) var filtre : TPsQRExportFilter; begin filtre := TPsQRPDFFilter.Create(Nom); try filtre.OriginalQRPrinter := Printer; QuickRep.ExportToFilter(filtre); finally filtre.free; end;

---

@+ Phil

Tu tiens peut être absolument à générer directement un PDF avec Delphi, je voulais juste dire sinon, qu'avec CutePDF gratuit, on peut s'affranchir de générer du PDF avec Quickrep.
De plus on peut mailer directement le fichier PDF générer...

Citation:

---

Envoyé par TicTacToe

Tu tiens peut être absolument à générer directement un PDF avec Delphi, je voulais juste dire sinon, qu'avec CutePDF gratuit, on peut s'affranchir de générer du PDF avec Quickrep.
De plus on peut mailer directement le fichier PDF générer...

---

Bonjour;

Il est bien l'outil mais les docs ne sont pas imprimables donc ca ne sert à rien de construire des docs si derrière on ne peux pas les imprimés.

A+;

salut

si ma solution te convient peut tu mettre le tag resolu

@+ Phil

Citation:

---

Envoyé par anapurna

salut

si ma solution te convient peut tu mettre le tag resolu

@+ Phil

---

Bonjour;

J'ai trouvé un autre composant payant pour réaliser ceci. Par contre si tu saias ou je peux trouver un composant gratuit pour apposer sur des fichiers Quickreport des codes barres, je serais très interessé.

Merci

Il y a quelques jours, il y a eu ce post ;)

http://www.developpez.net/forums/viewtopic.php?t=466025

Bon courage !

Je me permets de remonter ce post pour savoir s'il a été résolu .

C'est pourtant possible cf programme SmartQRP et pourtant , comme yanis97, je bloque .

Tu essayes de générer le pdf à partir d'un fichier QRP ou directement (méthode anapura) ?
Quelle version de Quick Report ?

en fait , j'ai mis mon post ici
pour répondre simplement :
fichier QRP chargé et Version 3.62 (pro)

résolu :yaisse2:
voir post déjà cité ci-dessous

Bonjour,

J'ai trouvé un compo intéressant : TExportQR chez Torry (TQRMultiExport - PDF and Image exporter v.1.0).

Il fonctionne pour QuickReport ou FastReport...

Il peut s'utiliser dans un preview ou dans un report.

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13

ExportQR.Title := 'Liste des Clients'; ExportQR1.Subject := ''; ExportQR1.Author := 'MOI'; ExportQR1.Producer := 'MOI S.A.'; // Avec dialogue... ExportQR1.Preview := QRPreview1; ExportQR1.ExportQRFromPreview; // ou ExportQR1.Report := QuickRep1: ExportQR1.ExportQR;   // ou Sans dialogue... ExportQR1.ExportQRPDF(Fichier, True);

---

J'ai apporté quelques améliorations et compressé un peu le code. Il suffit d'extraire les fichiers dans le répertoire "Source" et de recompiler la librairie.

A+