report.pas

来自「添加BDE别名:paikedata 设置path:[存放位置]paikeda」· PAS 代码 · 共 34 行

unit report;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, DB, DBTables, FR_Class, StdCtrls, Buttons, Grids, DBGridEh,
  ExtCtrls, FR_DSet, FR_DBSet;

type
  Tf_report = class(TForm)
    Panel1: TPanel;
    DBGridEh1: TDBGridEh;
    BitBtn1: TBitBtn;
    frReport1: TfrReport;
    pk: TTable;
    frDBDataSet1: TfrDBDataSet;
    date: TTable;
    frDBDataSet2: TfrDBDataSet;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  f_report: Tf_report;

implementation

{$R *.dfm}

end.