有一个过程TfrmMain.LoadData(),从文件"学生名册.mdb"中读取数据,(文件已事先写好)
该过程的前三句是:
ControlModule.Engine:=CreateOLEObject('DAO.DBEinge.36');
ControlModule.testDB:=controlModule.Engine.OpenDataBase('学生名册.mdb');
ControlModule.testRS:=controlModule.testDB.OpenRecordSet('SELECT
* FROM 学生信息 INNER JOIN 原学历 ON 学生信息.学号=原学历.学号
ORDER BY 学生信息。学号');
且有:
type
TControlModule = class(TDataModule)
private
{ Private declarations }
public
{ Public declarations }
Engine:oleVariant;
testDB:oleVariant;
testRS:oleVariant;
editFlag:string;
end;var
ControlModule: TControlModule;编译时显示:undeclared identifier'CreateOLEObject'(第一句)
undeclared identifier'FROM'(第三句)
这个CreateOLEObject在帮助中找不到,请指教!
该过程的前三句是:
ControlModule.Engine:=CreateOLEObject('DAO.DBEinge.36');
ControlModule.testDB:=controlModule.Engine.OpenDataBase('学生名册.mdb');
ControlModule.testRS:=controlModule.testDB.OpenRecordSet('SELECT
* FROM 学生信息 INNER JOIN 原学历 ON 学生信息.学号=原学历.学号
ORDER BY 学生信息。学号');
且有:
type
TControlModule = class(TDataModule)
private
{ Private declarations }
public
{ Public declarations }
Engine:oleVariant;
testDB:oleVariant;
testRS:oleVariant;
editFlag:string;
end;var
ControlModule: TControlModule;编译时显示:undeclared identifier'CreateOLEObject'(第一句)
undeclared identifier'FROM'(第三句)
这个CreateOLEObject在帮助中找不到,请指教!
解决方案 »
- Delphi怎么实现在点击窗体右上角的关闭时让他失效或者是点击时让窗体隐藏但不退出
- 郁闷,不知道该怎么解决!!
- 数组长度增加问题
- 如何让Direct3D抓取屏幕支持16位,24位,我只能支持32位BMP
- delphi 连接 sql server 数据库
- dll 中的form 用什么命令关闭
- imagelist控件设计时创建并增加位图和运行时创建并增加位图的结果不同,怎么解决这个问题?
- MIDI可以作为资源编译进EXE吗?如果可以我应该怎么做?谢谢了!
- 请教各位大虾一个问题。
- Timage中的bmp要如何才能打印出来?急!
- 请大家帮忙,谢谢,
- 哪里有Windows Media Encoder SDK for Delphi
而module中有uses comobj不解决问题,反倒unit1(也就是controlModule.Engine:=
CreateOLEObject('DAO.DBEinge.36');所在的模块)中加上uses comobj可以编译通过,怎么解释呢