一个关于TStringList操作的简单问题

[zebi]

我的程序如下：

var
listStr: TStringList;
begin
listStr := TStringList.Create;
listStr.Add('111');
listStr.Add('222');
listStr.Add('333');
......
listStr.Add('nnn');
end;

我想在listStr[0]的前面加一个'(',使值为 '(111'

请问我该怎么操作呢？

可以 listStr[0] := '(' + listStr[0]; 吗？

[netfyee]

可以啊，

[ruihuahan]

应该可以吧！！！

[ly_liuyang]

listStr.strings[0] := '(' + listStr[0].strings[0];

[vsice]

同意楼上....

[zebi]

listStr.strings[0] := '(' + listStr[0].Strings[0];

根本就编译不过，

listStr.strings[0] := '(' + listStr.Strings[0];

能编译过，但是错误依旧

[zebi]

对不起，刚才错了
listStr.strings[0] := '(' + listStr.Strings[0];

这样是可以的，
可是我想用listStr.strings[1]啊

listStr.strings[1] := '(' + listStr.Strings[0];
为什么不可以呢？

[hnxrm]

你用个中间变量啊.
var
tem:string;
begin
tem:=:= '(' + listStr.Strings[0];
listStr.strings[0] := tem;

[hnxrm]

错了,应该是
var
tem:string;
begin
tem:=:'(' + listStr[0];
listStr[0] := tem;

[liuhx]

var
temp:string;
begin
temmp:='('+listStr.string[0];
listStr.Add(temp);
end;

[zebi]

listStr[0]怎么操作都是没有问题的，

但是要操作listStr[1]，就不行了
可以在listStr[1]的后面加，但是不能在前面加


另外，我怎么去除串呢？
如：listStr[0] = '11111)';
我想去除')'，使listStr[0] = '11111';