procedure TForm1.btn1Click(Sender: TObject);
var
intX1,intX2,intX:Int64;
intA,intB,intC,intD:Int64;
begin
intA:=256*256;
intB:=256*256;
intC:=256*256;
intD:=256*255;
intX1:=intA*intB;
intX2:=intC*intD;
intX:=intX1*intX2;
showmessage(inttostr(intX)) ;
end;
解决方案 »
- 怎样从最快的MEMO中读取指定长度的字符串
- [急问]cxgrid按某一列排序后的问题
- 各位老大:请问如何才能读出ini文件中特定小节名下关键字的个数?
- 如何在本地计算机上模拟某个网页上的某个链接的onMouseDown(即调用页面中的某个JavaScript写的函数)
- Bold For D6不能运行!
- 数据库触发器问题
- ★★★简单问题送100分★★★:delphi6里,怎么没有看到table组件?
- 我写了个文本编辑器,但与文本文件关联时出了问题!
- 在delphi中,怎样处理Application级的消息和异常?
- 关于simpledataset的问题
- 请问开机用服务运行起的程序,如何不显示界面的问题
- Delphi 如何实现类似BBS的界面
请用double类型
type Int64 = -9223372036854775808..9223372036854775807;
当数据越界时( >9223372036854775807)时,仅保留后64位数据,造成假值现象。你的IntX值远远大于9223372036854775807,越界的结果就是一个负数的假象。
应该是 7个256,1个128,才是2^63次7个256,1个128 显示也是负数
大于Int64的最大数 9223372036854775807。
应该是 7个256,1个128,才是2^63次7个256,1个128 显示也是负数
2^63-1才是最大的整数
多1,就成了负数delphi中最大正整数应该是2^32-1吧
delphi中最大正整数应该是2^63-1
自己或第三方实现的 任意位数 大整数 类。好像go还是python倒是自带了,可能是后者