这句话为什么编译不通过？ (20分)

S

sun_flower_2000

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-01-08

• #1

这句话为什么编译不通过？
s1 := floattostr(FormatFloat(dNumber,'#0.00'));

s1:string;
dnumber:single
报错信息：
[Error] Unit1.pas(50): Incompatible types: 'String' and 'Single'
[Error] Unit1.pas(53): Incompatible types: 'Integer' and 'Single'
[Fatal Error] Project1.dpr(5): Could not compile used unit 'Unit1.pas'

 

M

miaofeng

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-01-08

• #2

FormatFloat本身返回的就是String。

 

M

miaofeng

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-01-08

• #3

这是Delphi帮助中的说明：
function FormatFloat(const Format: string
Value: Extended): string;
所以就不需要再使用FloatToStr了，直接：
s1 := FormatFloat('#0.00',dNumber);

 

M

miaofeng

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-01-08

• #4

另外注意FormatFloat参数的位置先后顺序。

 

S

sun_flower_2000

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-01-08

• #5

接受答案了.