我要判断某字符型字段的值是否=0(50分)

C

c.jack

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-05-01

• #1

我要判断某字符型字段的值是否<=0，但是当它为空时，下面的语句出错，请大家帮忙。
if strtoint(adodataset1.Recordset.Fields[2].value)<=0 then

 

T

taozhiyu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-05-01

• #2

what is Error info?

 

C

c.jack

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-05-01

• #3

错误：Invilid variant type conversion
我想肯定是inttostr(empty)出错了，怎么办？

 

H

hbezwwl

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-05-01

• #4

设置字段默认值为0,就不会出现为空的情况。

 

陈

陈锡震

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-05-01

• #5

你先加个判断不就行了吗？
if (adodataset1.Recordset.Fields[2].value <> "") then
if strtoint(adodataset1.Recordset.Fields[2].value)<=0 then
//
else
else

 

S

seaerwang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-05-01

• #6

同意楼上的

 

沙

沙隆巴斯的主人

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-05-01

• #7

if strtointdef(adodataset1.Recordset.Fields[2].value,1)<=0 then

 

D

Del_Sun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-05-01

• #8

其实这种情况你不如写一个函数以后也用得着
function strToIntDef(Value: String; DefValue : Integer = 0) : Integer;
begin
try
Result := StrToInt(Value);
except
Result := DefValue;
end;
end;
在程序中用这个函数代替strToInt就可以了
用到得地方会很多的。

 

C

c.jack

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-05-09

• #9

多人接受答案了。