Question

delphi中，怎样把字符串中的一个字符副给另一个字符串？

如ss:='abcd';
怎么把ss1中的'c'副给另一个字符串ss2
让ss2='c'

急用，在线等！！

Answer 1

如果只是实现你所说的这个 很简单 呵呵
var S1,S2:String;
begin
S1:=\'abcd\';
S2:=copy(S1,Pos(\'c\',S1),1);
label1.Caption:=S2;
end;

当然你如果取的是某位置的字符串 用这个函数比较简单
function MidStr(const AText: string; const AStart, ACount: Integer): string; $[StrUtils.pas

Answer 2

不明白，问题没描述清楚。