FastreportPinter est une bibliothèque d'impression de rapport rapide de rapport pour les environnements multithreading et non GUI (interface utilisateur graphique) .
Implémenté dans Delphi Language, il utilise le concept d'interface CLUENT pour guider l'utilisation de la bibliothèque, conçue pour imprimer des rapports dans l'interface utilisateur graphique à l'aide d'imprimer Spooler.
Environnements
Pour utiliser FastreportPinter , vous devez installer le composant Fast Report.
En utilisant le boss (Dependency Manager pour Delphi), il est possible d'installer automatiquement la bibliothèque.
boss install github.com/antoniojmsjr/FastReportPrinter
Si vous choisissez d'installer manuellement, ajoutez simplement les dossiers suivants à votre projet, dans le projet> Options> Compiler Delphi> Target> Toutes les configations> Chemin de recherche
..FastReportPrinterSource
Les ensembles de données sont une interface utilisée par la bibliothèque pour la communication avec la base de données via les composants:
| Classe | Composant |
|---|---|
| Chit | Indigène |
| Tfrxdbdataset | Rapport rapide |
Pour illustrer l'utilisation de la bibliothèque , les données de l'API d'IBGE ont été utilisées pour les rapports et l'impression du rapport.
Impression Exemple de fichier: LocationsIbge.pdf
Des exemples sont disponibles dans le dossier du projet:
..FastReportPrinterSamples
Exemple de base de données
..FastReportPrinterSamplesDB
Exemple de rapport
..FastReportPrinterSamplesReport
Exemple
uses FRPrinter, FRPrinter.Types; var
lPrinted: Boolean;
begin
// CLASSE DE IMPRESSÃO
try
lPrinted := TFRPrinter.New.
DataSets.
SetDataSet(qryEstadosBrasil, ' EstadosBrasil ' ).
SetDataSet(frxdbMunicipioEstado).
SetDataSet(frxdbMunicipioRegiao).
SetDataSet(qryEstadoRegiao, ' EstadoRegiao ' ).
SetDataSet(qryMunicipios, ' Municipios ' ).
& End .
Print.
SetPrinter( ' Microsoft Print to PDF ' ). // QUANDO NÃO INFORMADO UTILIZA A IMPRESSORA CONFIGURADA NO RELATÓRIO *.fr3
SetFileReport(TUtils.PathAppFileReport). // LOCAL DO RELATÓRIO *.fr3
Report(procedure(pfrxReport: TfrxReport) // CONFIGURAÇÃO DO COMPONENTE DE RELATÓRIO DO FAST REPORT
var
lfrxComponent: TfrxComponent;
lfrxMemoView: TfrxMemoView absolute lfrxComponent;
begin
// CONFIGURAÇÃO DO COMPONENTE
pfrxReport.ReportOptions. Name := ' API de localidades IBGE ' ; // NOME PARA IDENTIFICAÇÃO NA IMPRESSÃO DO RELATÓRIO
pfrxReport.ReportOptions.Author := ' Antônio José Medeiros Schneider ' ;
// PASSAGEM DE PARÂMETRO PARA O RELATÓRIO
lfrxComponent := pfrxReport.FindObject( ' mmoProcess ' );
if Assigned(lfrxComponent) then
begin
lfrxMemoView.Memo.Clear;
lfrxMemoView.Memo.Text := Format( ' Aplicativo de Exemplo: %s ' , [ ' VCL ' ]);
end ;
end ).
Execute; // PROCESSAMENTO DO RELATÓRIO/IMPRESSÃO
except
on E: Exception do
begin
if E is EFRPrinter then
ShowMessage( ' Erro de impressão: ' + E.ToString)
else
ShowMessage( ' Erro de impressão: ' + E.Message);
Exit;
end ;
end ;
if lPrinted then
ShowMessage( ' Impresso ' )
else
ShowMessage( ' Falha de impressão ' );
end ;Observation
Exemple compilé
Télécharger: Demo.zip
Test de performances pour les applications Web à l'aide de JMeter:
..FastReportPrinterSamplesJMeter
FastReportPrinter est gratuit et un logiciel open source sous licence