有没有将字符转换成带小数的变量！小弟实在太苯了！(100分)

S

sh2

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-06-19

• #1

比如：
a:String;

begin
a:='1.01';
将a转换成数字变量！

 

C

Calvin

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-06-19

• #2

procedure TForm1.Button1Click(Sender: TObject);
var
s:String;
f:Real;
Code:Integer;
begin
s:=Edit1.Text;
Val(s,f,Code);
if Code=0 then
Edit2.Text:=FloatToStr(f);
end;

 

F

foxntbk

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-06-19

• #3

b : real;
begin
a:='1.01';
b := strtofloat(a);
end;

 

B

boy_zyz

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-06-19

• #4

strtofloat(a)
strtoint(a)
strto...

 

S

Sachow

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-06-19

• #5

好不容易遇到一个简单的问题，却慢了一步。

 

千

千中元

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-06-19

• #6

hehe

 

C

Chenlili

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-06-19

• #7

呵呵，看看帮助，strto...的函数一大把。

 

K

K

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-06-19

• #8

"将a转换成数字变量！"
他是不是要将字符变量a转换成实型或整型变量

 

K

Kang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-06-19

• #9

字符只能转成整数
字符串可以转成整数或浮点数

 

G

garden_wood

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-06-21

• #10

查strto开头的函数就可以找到一大堆。
以后要是碰类型转换的问题，就查以该类型名开头的函数，多半能找到

 

W

wjiachun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-07-27

• #11

时间太久，强制结束。 wjiachun