Formulário de Relatório de Vendas

O MainModule já inclui a maior parte da funcionalidade necessária para produzir relatórios. Usando o módulo de dados reportDM, ele cria um relatório em PDF no servidor. O Formulário de Relatório de Vendas exibe o relatório em PDF de acordo com a plataforma alvo.

dSalesReport

Este formulário expõe uma propriedade para receber o nome do arquivo (URL) do relatório em PDF antes de exibí‑lo. Um Visualizador de PDF completo (que também pode baixar, imprimir e executar outras ações) já faz parte da paleta uniGUI (disponível para ambas as plataformas).

unit _dSalesReportForm;
unit _dSalesReportForm;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics,
  Controls, Forms, uniGUITypes, uniGUIAbstractClasses,
  uniGUIClasses, uniGUIForm, uniGUIBaseClasses, uniURLFrame;

type
  TdSalesReportForm = class(TUniForm)
    UniPDFFrame1: TUniPDFFrame;
  private
    procedure SetPDFUrl(const Value : string);
  public
    property PDFUrl : string write SetPDFUrl;
  end;

function dSalesReportForm: TdSalesReportForm;

implementation

{$R *.dfm}

uses
  MainModule, uniGUIApplication;

function dSalesReportForm: TdSalesReportForm;
begin
  Result := TdSalesReportForm(UniMainModule.GetFormInstance(TdSalesReportForm));
end;

{ TdSalesReportForm }

procedure TdSalesReportForm.SetPDFUrl(const Value : string);
begin
  UniPDFFrame1.PdfURL := Value;
end;

end.