Delphi

本类阅读TOP10

·游戏外挂设计技术探讨①
·如何使用Delphi设计强大的服务器程序
·分布式网络考试系统原型分析及实现
·用DLL方式封装MDI子窗体。
·使用HOOK随心监视Windows
·Delphi 水晶报表打包解决
·url编码与解码工具附代码
·工人线程中关闭窗体的实现
·hdsi2.0 sql注入部分抓包分析语句
·Borland Delphi 2005 下载

分类导航
VC语言Delphi
VB语言ASP
PerlJava
Script数据库
其他语言游戏开发
文件格式网站制作
软件工程.NET开发
An Unknown error has occurred -- EOleException 解决方法

作者:未知 来源:月光软件站 加入时间:2005-2-28 月光软件站

今日开发遇到一个错误:

Delphi 7.1。
使用
ADO连接SQL Server,Book_ADOQuery有一个Lookup字段,每当Insert/Append的时候IDE就会弹出一个错误:

An Unknown error has occurred -- EOleException

跟踪发现错误来源于VCL LocateRecord方法的FLookupCursor.Find

function TCustomADODataSet.LocateRecord(const KeyFields: string;
  const KeyValues: OleVariant; Options: TLocateOptions;
  SyncCursor: Boolean): Boolean;

 if FieldCount = 1 then
          FLookupCursor.Find(GetFilterStr(FieldByName(KeyFields), KeyValues, Partial), 0,
             adSearchForward, EmptyParam)
   
而且如果连接Access数据库也没有问题。

通过Google发现,该Bug在Delphi 5中就有了:
http://info.borland.com/devsupport/delphi/fixes/delphi5/database.html

Area: database\ado

Reference Number: 72996
Status: Open
Date Reported: 10/14/99
Severity: Commonly Encountered
Type: Minor Functionality Failure

Problem:

When using Lookup fields, inserting a record will 
generate "An unknown error has occured" 
exception in some cases.

Workaround:

Requires VCL code changes.
Install Update Pack.








最后通过研究另外一个类似问题,发现:
只要把所有Lookup字段的lookupCache设为True(缺省为False)就可以避免该错误。


特记于此。





相关文章

相关软件




月光软件程序下载编程文档电脑教程网站设计网址导航网络文学游戏天地幽默笑话生活休闲写作范文安妮宝贝
电脑技术编程开发网络专区谈天说地情感世界游戏元素分类游戏热门游戏体育运动手机专区业余爱好影视沙龙
音乐天地数码广场教育园地科学大观古今纵横谈股论金人文艺术医学保健动漫图酷二手专区地方风情各行各业

月光软件站·版权所有