数据库连接放在了主程序exe里面了,模块分了很多bpl。
因为有多个bpl,所有我做了一个comm.bpl,用来包一些公用的unit,其中包括数据接口的unit。然后每个模块的bpl都添加comm.bpl,其中接口文件如下:
unit IDataModule;interfaceuses ADODB;type
TIDM = interface
['{CE4B0AA7-CE04-4F67-A107-409A5F9DC184}']
function GetConn : TADOConnection;
end;var
IDM : TIDM;implementationend.请问我怎么在每个bpl文件中建立数据连接呢,我直接用IDM.GetConn会报错.
上传图片失败
提示信息为:Access violation at address 0003BE2 IN MODULE 'A_XTG..PBPL'.
rEAD OF ADDRESS 00000000.
因为有多个bpl,所有我做了一个comm.bpl,用来包一些公用的unit,其中包括数据接口的unit。然后每个模块的bpl都添加comm.bpl,其中接口文件如下:
unit IDataModule;interfaceuses ADODB;type
TIDM = interface
['{CE4B0AA7-CE04-4F67-A107-409A5F9DC184}']
function GetConn : TADOConnection;
end;var
IDM : TIDM;implementationend.请问我怎么在每个bpl文件中建立数据连接呢,我直接用IDM.GetConn会报错.
上传图片失败
提示信息为:Access violation at address 0003BE2 IN MODULE 'A_XTG..PBPL'.
rEAD OF ADDRESS 00000000.
解决方案 »
- 三层的例子终于成功了一大部份了,还有点小问题谁帮我解一下?
- 用DELPHI的ADO+MYSQL做成的程序在用float(D,M)数据类型的问题??
- 为何使用A3,A4的纸张设置在预览的时候没有任何变化。(字段多,预览的时候总是显示不出来) 在线等待,高分答谢!!!
- 那有delphi7web方面的资料?
- 请问在登陆的时候怎么实现密码对话矿效果?
- 不好意思,再打扰一下
- a: array of byte 如何变换为string类型?
- 为何D6中QReport打印预览中点打印图标后,网络打印机没有反应?
- 我要给分,为什么总是出现这样的错误?
- 应该是不难的问题?关于Object PASCAL的/运算符
- 关于数据访问求助
- F1Book1.ReadEx() 提示方法失败
中的IDM必须实例化
可以使用
initialization
IDM := TIDM.create(nil);
finalization
IDM.Free;
end;