怎样替换tstings中的一个字符串？

Question

为了修改

Answer 1

可以直接修改啊。stringlist.Strings[0] := 'sss' ;

Answer 2

对StringList.Text访问，使用StringReplace替换字符串

Answer 3

var S,S1: string;
begin
  S :=edit1.Text;
  S1:=edit2.Text;
  while Pos(S1, s) > 0 do
  begin
    s:=copy(s,1,Pos(S1,s)-1)+'zwg'+copy(s,Pos(S1,s)+length(S1),length(s)-Pos(S1,s)-length(S1)-1);
    edit3.Text:=s;
  end;

Answer 4

将strings.text直接付给clipboard，然后复制到文本文档里，各字符串之间怎样间隔？（不会没有间隔吧？）