recordform.pas

来自「某疗养院动脉硬化管理系统」· PAS 代码 · 共 39 行

unit RecordForm;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, BaseUnit, ExtCtrls, cxStyles, cxCustomData, cxGraphics,
  cxFilter, cxData, cxDataStorage, cxEdit, DB, cxDBData, cxGridLevel,
  cxClasses, cxControls, cxGridCustomView, cxGridCustomTableView,
  cxGridTableView, cxGridDBTableView, cxGrid, DBCtrls, ADODB, StdCtrls,
  Buttons;

type
  TFrmRecord = class(TForm1)
    Panel1: TPanel;
    Panel2: TPanel;
    cxGrid1: TcxGrid;
    cxGrid1DBTableView1: TcxGridDBTableView;
    cxGrid1Level1: TcxGridLevel;
    DBNavigator1: TDBNavigator;
    ADQ: TADOQuery;
    ds: TDataSource;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  FrmRecord: TFrmRecord;

implementation

uses DataModule;

{$R *.dfm}

end.