又发现了一个:(还是在delphi/source/soap 目录下面的XSBuiltIns.pas 文件中
下面这个函数:// get Small Int Using Digits in value, positive or negative. function IntFromValue(Value: WideString; Digits: Integer): SmallInt; begin
Result := 0;
if Value[1] = '-' then
Result := StrToInt(Value)
else if Value <> '' then
Result := StrToInt(Copy(Value, 1, Digits));
end;很明显的bug呀! 假如 参数Value = '' 那么执行到 if Value[1]就出错了:(
我真是要FT了!
下面这个函数:// get Small Int Using Digits in value, positive or negative. function IntFromValue(Value: WideString; Digits: Integer): SmallInt; begin
Result := 0;
if Value[1] = '-' then
Result := StrToInt(Value)
else if Value <> '' then
Result := StrToInt(Copy(Value, 1, Digits));
end;很明显的bug呀! 假如 参数Value = '' 那么执行到 if Value[1]就出错了:(
我真是要FT了!
解决方案 »
- MYSQL的语句怎么写比较好?
- 为什程序关了,还提示有程序在使用该文件
- 大家帮我分析一下
- DBGrid -Columns-Add All Fields 怎样用代码调用???
- 会Delphi 的朋友都可以进来
- datetimepicker怎么没有设置readonly为true,这样可以没法选择。
- 如何让应该程序运行时不在任务栏上显示?
- 关于midas中巢状数据的问题,请进来看看.两个多星期了还没有搞定.
- 关于tcxmaskedit的问题
- 如何对日期型字段进行操作,高分...
- 两个线程对一个数组进行读写,该如何同步互斥呢?谢谢。
- 给我意见,助我抉择(应就送分)(在Delphi,Java,人才热线开了3个帖子求助)
function TXSCustomDateTime.GetAsDateTime: TDateTime;
var
DateString: string;
Slash: string;
Colon: string;
begin
Slash := DateSeparator;
Colon := TimeSeparator;
DateString := IntToStr(Month) + Slash + IntToStr(Day) + Slash + IntToStr(Year)
+ ' ' + IntToStr(Hour) + Colon + IntToStr(Minute) + Colon +
IntToStr(Second);
Result := StrToDateTime(DateString);
end;同样的bug!!
0oooo
( )
) /
(_)
你的贴子在哪里,我记不得你问的是什么了,我再去看看
现在是一个新的update,我在国内一个个人主页下载的,
你查查以前的贴子,我也在csdn上看的!
主要就是更改了很多web service的东西,尤其是与ms的那一套vs7和soap toolkit的兼容性!
BTW: 我昨天又发现了另外的bug,在OPToSoapDomConv.pas中
我一直都是很喜欢用delphi的,从2.0版我就开始用了,一直对他情有独钟,以前也没有发现什么bug,但是自从delphi5以后我发现了越来越多的bug,是不是因为borland的那个牛人到了M$的后果?而且最近两年borland太急功近利了,你看看他现在出产品的速度多快,我刚刚从jbuilder4升级到jb5,他居然已经出了jb6了,FT! 最求速度带来的恶果就是质量下降。我还是喜欢以前的borland。
至于源代码的bug,呵呵,新东西难免了!你要知道delphi才多少人作,
而vc是多少人作啊!