EhLib 4.1 在 Delphi 2007 下无法过滤和排序的问题 大 | 中 | 小

  在Delphi2007下安装了最新的EhLib v4.2.6,发现 DBGridEh 无法进行排序和过滤,执行操作时无反应。后来发现,如果选择本地过滤和排序的话,一切都会正常;如果是服务器端排序和过滤,则无法正常执行,错误信息为类型转换错误。

跟踪EhLib代码发现,是DBUtilsEh.pas文件中的SetDataSetSQLLikeProp 和IsDataSetHaveSQLLikeProp 函数中的以下相关代码报错:


具体的类型转换错误是指TObject与TStrings转换错误,所以报错。
我用的是ADOQuery,其SQL属性在Delphi7下是TStrings类型,在Delphi2007下是TWideStrings,由TObject转换为TStrings按理说不应该转换不成功啊。

继续查看代码才发现:
TWideStrings没有继承自TStrings,而是继承自TPersistent,理论上跟TStrings没有关系,将他转换为TStrings,当然会报错了。

找到原因后,将EhLib相关出错函数的代码改为以下:


修改后,重新编译,一切正常。

附:如果在Delphi2007中安装EhLib4.X时报错,那么注释掉EhLibVCL.pas文件中的“TBytes = array of Byte”行即可正常安装了(因为在Delphi2007中CodeGear自己定义了TBytes类型)。

谢祥选【小宇飞刀(xieyunc)】
原文地址:https://www.cnblogs.com/xieyunc/p/9126613.html