1.Double类型
var d: Double
begin
d := -12.35;
if d = -12.35 then
showmessage('sb, delphi竟有这种bug') //竟然是这一句
else
showmessage('good, delphi');
end;
2.ado的事务
adoConnection.BeginTrans
try
//........................在这里好几个Insert语句执行之。
adoConnection.Commit;
except
adoConnection.Rollback;
end;
你会发现只有最后一句才Insert了,前面几个Insert不成功, 可用sql server的跟综器看了一下sql执行情况,竟然全部执行了sql语句. 晕