dbgridmain.pas

来自「GREATIS Print Suite Pro for Delphi (3-7,」· PAS 代码 · 共 41 行

(*          GREATIS PRINT SUITE                 *)
(*  Copyright (C) 2001-2007 Greatis Software    *)
(*      web: http://www.greatis.com             *)
(*  support: http://www.greatis.com/bteam.html  *)

unit DBGridMain;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  PSJob, PSStatusBar, PSPreview, ExtCtrls, PSToolbar, PJDBGrid, Db, DBTables,
  Grids, DBGrids, PJGrid, PJTextGrid;

type
  TMainForm = class(TForm)
    PreviewToolbar: TPreviewToolbar;
    Preview: TPreview;
    PreviewStatusBar: TPreviewStatusBar;
    DBGridPrintJob: TDBGridPrintJob;
    Table: TTable;
    DataSource: TDataSource;
    TableLast_Name: TStringField;
    TableFirst_Name: TStringField;
    TablePhone: TStringField;
    TableFax: TStringField;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  MainForm: TMainForm;

implementation

{$R *.DFM}

end.