这代码哪错了呢？关于if语句我是新手！

明次发布于 2012-10-25 23:46， 715 次点击

程序代码：

if(strToint(edit1.Text)<0 or strToint(edit1.text)>255) then

begin
showmessage('有效值必须在0~255之间');
edit1.Text:=intTostr(0);

end

看了好久老是运行不了，帮忙找下哪错了

3 回复

wp2319572012-10-26 18:41

or 前 oR 后必须单独括号
if(strToint(edit1.Text)<0) or (strToint(edit1.text)>255)

但是这段代码还是有问题仍需改进

xuehai0082012-11-06 13:20

进来学习。怪怪的代码。

meyu882013-02-17 13:36

if not (StrToInt(Edit1.Text) In [0..255]) then
begin
showmessage('有效值必须在0~255之间');
edit1.Text:=‘0’;
end;

改成这样比较好些。

这代码哪错了呢？关于if语句 我是新手！