Y yangyugw Unregistered / Unconfirmed GUEST, unregistred user! 2002-11-02 #1 我想吧real转换成int c里面是int()强制转换就可以了 delphi如何做啊
春 春意 Unregistered / Unconfirmed GUEST, unregistred user! 2002-11-02 #7 procedure TForm1.Button2Click(Sender: TObject); var a:real; begin a:=1561.15; showmessage(inttostr(trunc(a))); end; 同意上面的观点!
procedure TForm1.Button2Click(Sender: TObject); var a:real; begin a:=1561.15; showmessage(inttostr(trunc(a))); end; 同意上面的观点!
Y yangyugw Unregistered / Unconfirmed GUEST, unregistred user! 2002-11-02 #9 floattoint,delphi5.0里面没有啊 不过round,和 trunc都可以 给分