我的程序如下: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]; 吗?
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]; 吗?
解决方案 »
- 可否在fastreport交叉报表的列合计后面再添加一列????
- delphi 字符串 截取的疑难问题,,麻烦大帮帮忙????????????
- 我在对DELPHI的实数型数值赋值时出现了一个问题———
- adoconnection在客户端连接到SQL server,连不上,而当以系统上登陆到那台计算机后.....
- 我的DBGRID会自动增加一行,但人想改为不自动增加,不知哪位大虾能帮一下忙?
- 邮件程序问题??
- 请问谁知道:两台机器联对等网,网线是怎么恰的,有关的网址也可以
- 如何用BDE在WIN2000中存取图片字段
- 救命呀~~!!!自定义协议发送文件 数据段的定义有问题 谁帮解决一下~~!!!我新手
- 我用Tqrshape拼了一张报表,但往上面放dbtext时,总处于下面看不到,应该如何设,使dbtext处在上层?
- word文件問題?高手請進!!在線等待....
- 关于 "Nicrosoft的心里话"的产生的真正内幕 有心人可以看一下
listStr.strings[0] := '(' + listStr.Strings[0];这样是可以的,
可是我想用listStr.strings[1]啊listStr.strings[1] := '(' + listStr.Strings[0];
为什么不可以呢?
var
tem:string;
begin
tem:=:= '(' + listStr.Strings[0];
listStr.strings[0] := tem;
var
tem:string;
begin
tem:=:'(' + listStr[0];
listStr[0] := tem;
temp:string;
begin
temmp:='('+listStr.string[0];
listStr.Add(temp);
end;
可以在listStr[1]的后面加,但是不能在前面加
另外,我怎么去除串呢?
如:listStr[0] = '11111)';
我想去除')',使listStr[0] = '11111';