delphi – 使用带有字符串的Case语句

发布时间：2020-12-15 10:18:37 所属栏目：大数据来源：网络整理

导读：说我有一个字符串 'SomeName' 并希望在case语句中返回值。这可以吗在这样的case语句中可以使用字符串 Case 'SomeName' of 'bobby' : 2; 'tommy' :19; 'somename' :4000;else showmessage('Error');end; 解决方法 Delphi Case Statement 仅支持序数类型。所以

说我有一个字符串

'SomeName'

并希望在case语句中返回值。这可以吗在这样的case语句中可以使用字符串

Case 'SomeName' of

   'bobby' : 2;
   'tommy' :19;
   'somename' :4000;
else
   showmessage('Error');
end;

解决方法

Delphi Case Statement仅支持序数类型。所以你不能直接使用字符串。

但存在另一种选择

>构建一个基于字符串返回整数(散列)的函数
>使用泛型和匿名方法(A generic case for strings)
>使用接收字符串数组的函数(Making a case for Strings,the sane way)>等等。

（编辑：李大同）

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