Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/string/5.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
String 在delphi中如何将一个字符从字符串转换为字符_String_Delphi_Char_Delphi Xe2_Case - Fatal编程技术网

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

String 在delphi中如何将一个字符从字符串转换为字符,string,delphi,char,delphi-xe2,case,String,Delphi,Char,Delphi Xe2,Case,我有一个字符串,我想从中提取一个需要在Case语句中使用的字符。问题是大小写只接受字符值,而不接受字符串值。那么如何将单个字符串转换为字符呢?将字符串用作字符数组(基于1),并使用要在case语句中使用的字符的索引。例如,如果要使用第一个字符: case MyString[1] Of // ... end; 注意:在使用下标之前,请确保检查字符串的长度是否至少达到该长度,否则将导致访问冲突。由于字符串成为基于0的,因此也有一种从单个字符串获取字符的安全方法 myString[Low(myStr

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

将字符串用作字符数组(基于1),并使用要在
case
语句中使用的字符的索引。例如,如果要使用第一个字符:

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

注意:在使用下标之前,请确保检查字符串的长度是否至少达到该长度,否则将导致访问冲突。

由于
字符串成为基于0的,因此也有一种从单个字符串获取字符的安全方法

myString[Low(myString)]

由于delphi成为跨平台的,我将使用
TStringHelper
class-out-of-unit
System.SysUtils
,使用基于0的字符串访问:

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

如果您的个人代码库中有一个签名如下的函数,请举手:
function strotchar(const S:string;Index:Integer=1;Default:Char=''):Char很好的编辑,我做C#和Delphi,总是以零和1为基础的心理障碍结束,每次我都要检查:
C:=Copy(s+“”,1,1)[1]