Fastreportprinter เป็นรายงานการพิมพ์รายงานที่รวดเร็วสำหรับสภาพแวดล้อม แบบมัลติเธรด และไม่ใช่ GUI (ส่วนต่อประสานผู้ใช้กราฟิก)
นำมาใช้ในภาษา Delphi ใช้แนวคิดอินเทอร์เฟซที่คล่องแคล่วเพื่อเป็นแนวทางในการใช้ไลบรารีที่ออกแบบมาเพื่อพิมพ์รายงานในส่วนต่อประสานผู้ใช้กราฟิกโดยใช้ print spooler
สภาพแวดล้อม
ในการใช้ fastreportprinter คุณต้องติดตั้งส่วนประกอบรายงานที่รวดเร็ว
การใช้ บอส (ตัวจัดการการพึ่งพาสำหรับ Delphi) เป็นไปได้ที่จะติดตั้งไลบรารีโดยอัตโนมัติ
boss install github.com/antoniojmsjr/FastReportPrinter
หากคุณเลือกที่จะติดตั้งด้วยตนเองเพียงเพิ่มโฟลเดอร์ต่อไปนี้ลงในโครงการของคุณใน โครงการ> ตัวเลือก> Delphi Compiler> เป้าหมาย> การกำหนดค่าทั้งหมด> เส้นทางการค้นหา
..FastReportPrinterSource
ชุดข้อมูล เป็นอินเทอร์เฟซที่ใช้โดยไลบรารีเพื่อการสื่อสารกับฐานข้อมูลผ่านส่วนประกอบ:
| ระดับ | ส่วนประกอบ |
|---|---|
| การพูดคุย | พื้นเมือง |
| tfrxdbdataset | รายงานอย่างรวดเร็ว |
เพื่อเป็นแบบอย่างการใช้ไลบรารีข้อมูล API ของ IBGE ใช้สำหรับการรายงานและการพิมพ์รายงาน
ไฟล์ตัวอย่างการพิมพ์: locationibge.pdf
ตัวอย่างมีอยู่ในโฟลเดอร์โครงการ:
..FastReportPrinterSamples
ตัวอย่างฐานข้อมูล
..FastReportPrinterSamplesDB
รายงานตัวอย่าง
..FastReportPrinterSamplesReport
ตัวอย่าง
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 ;การสังเกตการณ์
ตัวอย่างที่รวบรวม
ดาวน์โหลด: demo.zip
การทดสอบประสิทธิภาพสำหรับเว็บแอปพลิเคชันโดยใช้ JMeter:
..FastReportPrinterSamplesJMeter
FastReportPrinter เป็นซอฟต์แวร์ฟรีและได้รับอนุญาตจากโอเพนซอร์ซภายใต้