＝＝＝判断是否为数字的函数是什么＝＝＝(10分)

C

coolsun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-04-28

• #1

如题。是不是isnumric？怎么用？谢谢

 

C

chnplzh

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-04-28

• #2

同意楼上的。

 

C

cwmdelpher

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-04-28

• #3

begin
if not(key in['0'..'9']) then
begin
result := False ;
end;
end

 

L

luky_99

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-04-28

• #4

自己寫呀。

 

康

康凌

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-04-28

• #5

val()

 

W

ww20000309

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-04-28

• #6

IsNumeric只能判断一个字符。如果你想用它可以：

for i:=0 to length(str) do
if not IsNumeric(str) then
showmessge("no data")

 

独

独帅

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-04-28

• #7

function IsNumber(const s: String): Boolean;
var
E: Integer;
N: Int64;
begin
Val(s, N, E);
Result := (E = 0);
end;

 

J

jameschin

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-04-29

• #8

我通常这样写
Function IsNumber(const s:string):Boolean;
begin
try
strToFloat(s);
result := true;
except
result := false;
end;

把这个字符串强行转为浮点数,如果是就返回真,如果发生错误,就返假
end;

 

M

Micro Whaight

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-04-29

• #9

可能还是康凌的好用。

 

C

coolsun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-05-01

• #10

接受答案了.