实际项目遇到的，比如在Memo里面第一行里有个逗号, 想替换成空，但是第二行里的不改变。 procedure TForm1.Button1Click(Sender: TObject); var   StrBuf:string; begin   StrBuf:=Memo1.Lines.Strings[0];   StrBuf:=StringReplace(StrBuf,',','',[rfReplaceAll, rfIgnoreCase