if(strToint(edit1.Text)<0 or strToint(edit1.text)>255) then
begin
showmessage('有效值必须在0~255之间');
edit1.Text:=intTostr(0);
end这代码哪错了呢?
begin
showmessage('有效值必须在0~255之间');
edit1.Text:=intTostr(0);
end这代码哪错了呢?
调试欢乐多
if(strToint(edit1.Text)<0) or (strToint(edit1.text)>255) then