把一个字符串中特定位置的一个字符赋值给一个字符变量。
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;
笑话军事旅游美容女性百态母婴家电游戏互联网财经美女干货家饰健康探索资源娱乐学院 数码美食景区养生手机购车首饰美妆装修情感篇厨房科普动物植物编程百科知道汽车珠宝 健康评测品位娱乐居家情感星座服饰美体奢侈品美容达人亲子图库折扣生活美食花嫁风景 | 首页 |
把一个字符串中特定位置的一个字符赋值给一个字符变量。
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;