unit9.pas

来自「利用Modem的远程通信功能」· PAS 代码 · 共 46 行

unit Unit9;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  Db, DBTables;

type
  TDataMD = class(TDataModule)
    TableReal: TTable;
    DataSourceReal: TDataSource;
    TableConfig: TTable;
    DataSourceConfig: TDataSource;
    TableRealBDEDesigner: TSmallintField;
    TableRealBDEDesigner2: TDateField;
    TableRealBDEDesigner3: TTimeField;
    TableRealBDEDesigner4: TFloatField;
    TableRealBDEDesigner5: TFloatField;
    TableRealBDEDesigner6: TFloatField;
    TableRealBDEDesigner7: TFloatField;
    TableDay: TTable;
    TableMonth: TTable;
    TableYear: TTable;
    DataSourceDay: TDataSource;
    DataSourceMonth: TDataSource;
    DataSourceYear: TDataSource;
    TableExceed: TTable;
    DataSourceExceed: TDataSource;
    TablePhone: TTable;
    DataSourcePhone: TDataSource;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  DataMD: TDataMD;

implementation

{$R *.DFM}

end.