如何在delphi中将一个字符从字符串转换为char

Question

我有一个字符串，我想从中提取一个需要在Case语句中使用的字符。 问题是Case只接受Char值而不是字符串值。 那么如何将单个字符串字符转换为char？

Answer 1

将字符串用作字符数组（从1开始），并使用要在case语句中使用的字符的索引。 例如，如果要使用第一个字符：

case MyString[1] Of
// ...
end;

注意：在使用下标之前，请确保检查字符串是否至少为该长度，否则您将获得访问冲突。

Answer 2

由于string在移动平台上变为0，因此从单字符字符串获取字符串也是一种始终安全的方法。

myString[Low(myString)]

Answer 3

由于delphi成为跨平台，我将使用TStringHelper类从单元System.SysUtils使用基于0的字符串访问：

case MyString.Chars(0) Of
// ...
end;