unit_data.pas

来自「Delphi+ADO+SQLServer 登陆:superuser/密码为空 」· PAS 代码 · 共 28 行

unit unit_data;

interface

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

type
  TWenYianData = class(TDataModule)
    Database1: TDatabase;
    qry_data: TQuery;
    qry_help: TQuery;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  WenYianData: TWenYianData;

implementation

{$R *.DFM}

end.