var s: string; i: int64; begin s := FormatDateTime('yyyyMMddHHmmss', now); i := StrToInt64(s); end;
int64不够大就用uint64,要支持uint64换delphi2006或以上版本
老大,不行啊,我用Int64和uint64总是返回0啊,我用的是delphi2009。
var s: string; iii: int64; begin s := FormatDateTime('yyyyMMddHHmmss', now); edt1.Text:=s; iii := StrToInt64(s); // 下断点看 iii 的值正确 ShowMessage(IntToStr(iii));
var
s: string;
i: int64;
begin
s := FormatDateTime('yyyyMMddHHmmss', now);
i := StrToInt64(s);
end;
老大,不行啊,我用Int64和uint64总是返回0啊,我用的是delphi2009。
var
s: string;
iii: int64;
begin
s := FormatDateTime('yyyyMMddHHmmss', now);
edt1.Text:=s;
iii := StrToInt64(s); // 下断点看 iii 的值正确
ShowMessage(IntToStr(iii));
谢谢啦,不过感觉delphi好奇怪啊,重新定义参数后莫名其妙的可以了再次感谢。