StringReplace 的 Bug

[budded]

S := 'sqr(sqt(2))';

将S中的sqr，sqt分别用 Char: #182, #183替换，看看什么结果？

我的环境：XP SP1， Delphi 7，Delphi 2005中均有此错误。
StringReplace 中的参数 RFlag: TReplaceFlags = [rfReplaceAll, rfIgnoreCase]；

这是我得到的结果：#182#183't(2))'

[chinaandys]

up

[merkey2002]

procedure TForm1.Button1Click(Sender: TObject);
var
s:string;
begin
s:='sqr(sqt(2))';
s:=stringreplace(s,'sqr',#182,[rfReplaceAll, rfIgnoreCase]);
s:=stringreplace(s,'sqt',#183,[rfReplaceAll, rfIgnoreCase]);
showmessage(s);
end;

得到结果須t(2))

[budded]

呵呵，原来 StringReplace 里边用Ansi……，揭帖！

[Sephil]

倒...