请问你看完这个有何感想？关于Delphi中的类型转换??

======================================================
注：本文源代码点此下载
======================================================

请问你看完这个有何感想?关于delphi中的类型转换??

请问你看完这个有何感想？关于delphi中的类型转换?? delphi / windows sdk/api

http://www.delphi2007.net/delphibase/html/delphi_20061215172228146.html

inttostr(abs(strtoint(booltostr(iadoquery.fieldvalues['ifaccept']))))

因为ifaccept字段是bit类型的,数据库里面的值如果是1的话,现在我要使用转换的方法取得一个1,而不是用if来进行判断,最后竟然写成上面的一堆代码!!

请问有更简单的办法吗??总体感觉delphi的类型转换审查太严,不想c++builder中的用着爽!!

更奇怪的是booltostr函数如果里面的是1的话,返回的是-1,我真搞不明白,borland的工程师为什么要这样,直接给个1不更好吗?

各位有何看法,讲讲。

iadoquery.fieldvalues('ifaccept').asstring

or

inttostr(ord(iadoquery.fieldvalues('ifaccept').asboolean))

只能说你的代码很有想像力!

setlength(trueboolstrs,1);

setlength(falseboolstrs,1);

trueboolstrs[0]:='1';

falseboolstrs[0]:='0';

booltostr(iadoquery.fieldvalues('ifaccept').asboolean,true);

绿色通道:好文要顶关注我收藏该文与我联系

posted on 2008-10-14 16:32 delphi2007 阅读(19) 评论(0)编辑 收藏

======================================================
在最后，我邀请大家参加新浪APP，就是新浪免费送大家的一个空间，支持PHP+MySql，免费二级域名，免费域名绑定 这个是我邀请的地址，您通过这个链接注册即为我的好友，并获赠云豆500个，价值5元哦！短网址是http://t.cn/SXOiLh我创建的小站每天访客已经达到2000+了，每天挂广告赚50+元哦，呵呵，饭钱不愁了，\(^o^)/