CnPack Forum


 
Subject: 报告问题 CnDHibernate(D2009) 升级BUG
bincom
新警察
Rank: 1



UID 41050
Digest Posts 0
Credits 12
Posts 4
点点分 12
Reading Access 10
Registered 2008-10-4
Status Offline
Post at 2008-10-4 21:25  Profile | Blog | P.M. 
报告问题 CnDHibernate(D2009) 升级BUG

本人在测试(Podo)时遇到 DHibernateQuery调用get取得对象时,发现所有string属性都取不到值,就跟踪一下,发现
这里有BUG:
function TCnDHibernateQuery.get(TableName: string; pkName: string; pkValue: Variant): TObject;  
...
if (tk = tkString) or (tk = tkLString) or (tk = tkWString) then  //Delphi2009 是 tkUString
...

修改后可以使用,其它功能暂未测到问题,估计不止这一处,请相关人员检查一下。
Top
Passion (LiuXiao)
管理员
Rank: 9Rank: 9Rank: 9


UID 359
Digest Posts 19
Credits 6750
Posts 3551
点点分 6750
Reading Access 102
Registered 2004-3-28
Status Offline
Post at 2008-10-5 09:29  Profile | Blog | P.M. 
好的谢谢报告。我们检查一下其他地方。
Top
rarnu (橙子)
灌水部部长
Rank: 8Rank: 8


UID 2689
Digest Posts 11
Credits 648
Posts 209
点点分 648
Reading Access 10
Registered 2006-10-2
Status Offline
Post at 2008-10-5 10:47  Profile | Site | Blog | P.M. 
又是字符串的问题。。。又要大改了。。。




Rarnu
CnPack Interfacer
rarnu@cnpack.org
Top
Passion (LiuXiao)
管理员
Rank: 9Rank: 9Rank: 9


UID 359
Digest Posts 19
Credits 6750
Posts 3551
点点分 6750
Reading Access 102
Registered 2004-3-28
Status Offline
Post at 2008-10-7 10:16  Profile | Blog | P.M. 
我先查找了一下WString,先加上UString。。。
Top
rarnu (橙子)
灌水部部长
Rank: 8Rank: 8


UID 2689
Digest Posts 11
Credits 648
Posts 209
点点分 648
Reading Access 10
Registered 2006-10-2
Status Offline
Post at 2008-10-7 11:06  Profile | Site | Blog | P.M. 
加UString必须加编译预处理的。。。。小心呀。。。
我一会下载代码来看看




Rarnu
CnPack Interfacer
rarnu@cnpack.org
Top
Passion (LiuXiao)
管理员
Rank: 9Rank: 9Rank: 9


UID 359
Digest Posts 19
Credits 6750
Posts 3551
点点分 6750
Reading Access 102
Registered 2004-3-28
Status Offline
Post at 2008-10-7 11:08  Profile | Blog | P.M. 
嗯,编译预处理用了CnPack.inc里头的UNICODE_STRING
Top
bincom
新警察
Rank: 1



UID 41050
Digest Posts 0
Credits 12
Posts 4
点点分 12
Reading Access 10
Registered 2008-10-4
Status Offline
Post at 2008-10-8 23:42  Profile | Blog | P.M. 
有5个 pas 文件需要改!

CnDHibernateUtils.pas,
CnDHibernateSubQueryAdv.pas,
CnDHibernateClasses.pas,
CnDHibernateQueryAdv.pas,
CnDHibernateBase.pas
一样的代码应该改成一个过程. 免个同时改多个地方。
Top
 




All times are GMT++8, the time now is 2024-3-28 17:49

    本论坛支付平台由支付宝提供
携手打造安全诚信的交易社区 Powered by Discuz! 5.0.0  © 2001-2006 Comsenz Inc.
Processed in 0.005959 second(s), 7 queries , Gzip enabled

Clear Cookies - Contact Us - CnPack Website - Archiver - WAP