L lyplay2 Unregistered / Unconfirmed GUEST, unregistred user! 2001-09-18 #1 VB中 INT(1。2)=1 DELPHI中如何?
杜 杜宝 Unregistered / Unconfirmed GUEST, unregistred user! 2001-09-18 #2 用取Round函数: var i:Integer; rouble; begin r:=3.14159; i:=Round(r); ShowMessage(IntToStr(i)); end;