类型转换(100分)

A

AYing

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-05-11

• #1

怎样将Extended类型的值转换为string类型?

 

A

apw

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-05-11

• #2

FloatToStr

procedure TForm1.Button1Click(Sender: TObject);
var
e: Extended;
s: string;
begin
e := 1.25789;
s := FloatToStr(e);
ShowMessage(s);
end;

 

放

放飞

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-05-11

• #3

var
s: String;
e: Extended;
begin
e := 123.4567;
//s := FloatToStr(e);
s := Format('%f', [e]);
end;