怎样将字符串类型转换为字符类型

Question

各位老师：
     我想依次断字符串中的 每一位数是否是['0','1','2','3','4','5','6','7','8','9']这个集合中的一个成员，程序如下：if copy(s1,n1,1) in [['0','1','2','3','4','5','6','7','8','9'] then 
showmessage('success');
但程序提示："copy(s1,n1,1)返回的是字符串，与集合中的元素类型不匹配，
请问，如何将字符串转换成一个字符型变量。

Answer 1

//可以用以下的方法判断
var
  str : String;
  I : Integer;
begin
  str := '134567966522312';//比如这是你的字符串
  for I := 1 to Length(str) do
  if not (str[I] in ['0','1','2','3','4','5','6','7','8','9']) then
  begin
     ShowMessage('出现非法数字');
     Break;
  end else Continue;
end;

Answer 2

if copy(s1,n1,1)[1] in [['0','1','2','3','4','5','6','7','8','9'] then 
                ^^^copy(s1, n1, 1)[1] <----取一个字符，兼容Char请试试看。