تنزيل FastReportPrinter - تنزيل رمز مصدر FastReportPrinter

FastReportPrinter

كود مصدر دلفي

v1.0.0

تنزيل

FastReportPrinter

FastReportPrinter هي مكتبة طباعة تقرير التقارير السريعة لبيئات MultiThreading وغير واجهة المستخدم الرسومية (واجهة المستخدم الرسومية) .

يتم تنفيذه بلغة Delphi ، ويستخدم مفهوم الواجهة بطلاقة لتوجيه استخدام المكتبة ، المصمم لطباعة التقارير في واجهة المستخدم الرسومية باستخدام Print التخزين المؤقت.

البيئات

نماذج Windows
وحدة التحكم Windows
خدمة Windows *
IIS isapi (حصان) *
IIS CGI (حصان) *

⭕ المتطلب السابق

لاستخدام FastReportPrinter ، تحتاج إلى تثبيت مكون التقرير السريع.

التثبيت الآلي

باستخدام Boss (مدير التبعية لـ Delphi) ، من الممكن تثبيت المكتبة تلقائيًا.

 boss install github.com/antoniojmsjr/FastReportPrinter

التثبيت اليدوي

إذا اخترت التثبيت يدويًا ، فما عليك سوى إضافة المجلدات التالية إلى مشروعك ، في Project> Options> Delphi Compiler> Target> جميع التكوينات> مسار البحث

 ..FastReportPrinterSource

؟ مجموعة بيانات التصدير

مجموعات البيانات هي واجهة تستخدمها مكتبة الاتصال مع قاعدة البيانات من خلال المكونات:

فصل	عنصر
شيت	محلي
TFRXDBDATASET	تقرير سريع

⚡ استخدام المكتبة

لتجسيد استخدام المكتبة ، تم استخدام بيانات واجهة برمجة تطبيقات IBGE للإبلاغ عن التقرير وطباعة.

مثال طباعة ملف: SOCATIONSIBGE.PDF

الأمثلة متوفرة في مجلد المشروع:

 ..FastReportPrinterSamples

مثال قاعدة البيانات

Firebird: 2.5.7 Donwload
ملف BD:

 ..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 ;

ملاحظة

نقص الذاكرة يمكن أن يولد فشل الطباعة.
قد يكون للطباعة المستندات الكبيرة تأخير في نجاح بصمة.
تطبيق خدمة Windows ، تحتاج إلى إعداد "تسجيل الدخول" باستخدام حساب إداري أو NT Authority ActalService أو NT Authority NetWorkservice للطباعة الناجحة.
IIS (ISAPI/CGI) بسبب وجود خطأ عندما التطبيقات APP 32 -BIT و Windows 64 -bit لا يمكنك طباعتها ، والحل ، وتجميع التطبيق 64 بت وبذوم باستخدام Authority Authority Local Account و NT Authoryth Networkservice.

مثال متجمع