delphi IF语句问题

2024-11-25 09:45:09
推荐回答(1个)
回答1:

if (strtoint(edit1.Text) >=1) and (strtoint(edit1.Text )<=30) then
begin
edit2.Text :='正常';
end
else
begin
edit2.Text :='' ;
end;