说我有一个字符串
'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)>等等。