摘要：
procedure TForm1.Button1Click(Sender: TObject);var c: Currency; i: Int64 absolute c;begin c := 1234.5678; ShowMessage(IntToStr(i)); //12345678end;procedure TForm1.Button2Click(Sender: TObject);var... 阅读全文
posted @ 2010-05-03 23:54
万一
阅读(3013)
评论(0)
推荐(0)
浙公网安备 33010602011771号