我想在动态连接库里定义一个全局变量,可是编译不能通过,以下是源代码:
library ReportDll;uses
sharemem,
SysUtils,
Classes,
Forms,
WinTypes,
dbtables,
rxquery,
db,
........{$R *.RES}var
db:TDatabase;procedure Init;
begin
db:=TDatabase.Create(nil);
db.AliasName:='main';
db.DatabaseName:='main1';
db.LoginPrompt:=false;
....
end;
怎么写才正确??????
library ReportDll;uses
sharemem,
SysUtils,
Classes,
Forms,
WinTypes,
dbtables,
rxquery,
db,
........{$R *.RES}var
db:TDatabase;procedure Init;
begin
db:=TDatabase.Create(nil);
db.AliasName:='main';
db.DatabaseName:='main1';
db.LoginPrompt:=false;
....
end;
怎么写才正确??????
sharemem,
SysUtils,
Classes,
Forms,
WinTypes,
dbtables,
rxquery,
db,
........var
db:TDatabase; **************************{$R *.RES}
procedure Init;
begin
db:=TDatabase.Create(nil);
db.AliasName:='main';
db.DatabaseName:='main1';
db.LoginPrompt:=false;
....
end;
怎么写才正确??????