
dephi程序,if语句那错了
ifframe21.Edit1.Text<=430thenbeginapplication.MessageBox('输入的数据过小,计算无意义,请重新输入!','提示!'...
if frame21.Edit1.Text <= 430 then
begin
application.MessageBox('输入的数据过小,计算无意义,请重新输入!','提示!',48);
frame21.Edit1.Text :='';
edit1.Clear ;
frame21.Edit1.SetFocus ;
exit;
end; 展开
begin
application.MessageBox('输入的数据过小,计算无意义,请重新输入!','提示!',48);
frame21.Edit1.Text :='';
edit1.Clear ;
frame21.Edit1.SetFocus ;
exit;
end; 展开
1个回答
展开全部
text是字符型吧,你直接用它跟整型的430比较似乎有点问题,应该写做
if (StrToInt(frame21.Edit1.Text) <= 430) then
if (StrToInt(frame21.Edit1.Text) <= 430) then

2022-08-05 广告
苏州蓝晓生物科技有限公司。标准化核心产品:公司拥有完整的琼脂糖介质、葡聚糖介质、聚甲基丙烯酸酯介质生产线,年产分离介质50000L,产品质量稳定并达到国际领先水平。核心优势:公司核心技术人员拥有近二十年不同基质的基球开发和官能化的丰富技术经...
点击进入详情页
本回答由苏州蓝晓生物科技有限公司_提供
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询