整数范围的Delphi case语句

发布时间：2020-12-15 04:30:08 所属栏目：大数据来源：网络整理

导读：我有一个函数正在传递一个整数值,表示一个步长值. 有五个单独的条件我想测试：值= 0 值= 1 值= -1 值 1 值-1 目前这是作为一组if语句来实现的,我想改变一个case语句.我对具体的价值实例没有任何问题,甚至是有限的范围(比如说1..10),但是我如何写一个代表Val

我有一个函数正在传递一个整数值,表示一个步长值.
有五个单独的条件我想测试：
值= 0
值= 1
值= -1
值> 1
值<-1 目前这是作为一组if语句来实现的,我想改变一个case语句.我对具体的价值实例没有任何问题,甚至是有限的范围(比如说1..10),但是我如何写一个代表Value> 1或Value< -1的case？

解决方法

var
  MyValue: integer;

...

case MyValue of
  Low(Integer)..-2:
    beep;
  -1:
    beep;
  0:
    beep;
  +1:
    beep;
  2..High(Integer):
    beep;
end;

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!