sl.Insert(1,'1234');//指定位置插入中的１代表什么
sl[2]:='5678';//替换 [2]代表什么
1和2都是索引号。索引号从0开始，因此1代表第二行字符串。
先用记事本建立一个文本文件aa.txt，内容如下：
123
234
345
456
下面的代码把会在234上面加入一行aaaa，并查找345替换成99999。
procedure TForm1.Button1Click(Sender: TObject);
var
Sl: TStringList;
i:integer;
begin
Sl:= TStringList.Create;
sl.LoadFromFile('e:/aa.txt');
sl.Insert(1,'aaaa');//指定位置插入
i:=sl.IndexOf('345');
if i=-1 then begin
sl.Add('345'); //如果没找到则增加一行。
end else begin
sl:='99999'; //如果找到了就替换。
end;
sl.SaveToFile('e:/aa1.txt');
sl.Free;
end;
