Delphi 中如何从一个字符串中得到特定位置的一个字符?

把一个字符串中特定位置的一个字符赋值给一个字符变量。
copy(S,1,1)函数取得的还是字符串,我要的是取得单个字符。谢谢

procedure TForm1.Button1Click(Sender: TObject);
var
T: Char;
X: string;
begin
X:= 'abcd';
T:= X[3];//T:= X[Pos('d',X)]可以指定字符
ShowMessage(T);//返回c
end;
温馨提示:答案为网友推荐,仅供参考
相似回答