字符串替换函数是什么？

Question

S := StringReplace(S, '''', '"', [rfReplaceAll]);

Answer 1

edit1.Text := StringReplace(edit1.Text,'''','"',[rfReplaceAll,rfIgnoreCase]);

Answer 2

procedure TForm1.Button1Click(Sender: TObject);
var
        s:string;
begin
        s:='kkkkkkkk aaa kkkkkkk';
        s:=stringreplace(s,'aaa','lll',[rfreplaceall]);
        showmessage(s);
end;

Answer 3

function StringReplace(const S, OldPattern, NewPattern: string; Flags: TReplaceFlags): string;

Answer 4

s:= StringReplace(S, '''', '''', [rfReplaceAll]);