StringReplace 怎么用？？

Question

UnitSysUtilsCategorystring handling routinestype
  TReplaceFlags = set of (rfReplaceAll, rfIgnoreCase);
function StringReplace(const S, OldPattern, NewPattern: string; Flags: TReplaceFlags): string;＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
stringReplace(edit1.Text,'  ',' ');
＝＝＝[Error] Unit2.pas(103): Not enough actual parameters
stringReplace(edit1.Text,'  ',' ',0);
＝＝＝[Error] Unit2.pas(103): Incompatible types: 'TReplaceFlags' and 'Integer'我到底应该怎样用stringReplace？？？？急

Answer 1

stringReplace(旧参数,新参数,替换标志(rfreplaceAll全部替换,rfignoreCase忽略大小写))

Answer 2

stringReplace(edit1.Text,'  ',' ', []);

Answer 3

cxtj：string;
cxtj:=cxtj+stringReplace(edit1.Text,'  ',' ',rfreplaceAll);
====[Error] Unit2.pas(103): Incompatible types: 'TReplaceFlags' and 'Enumeration'
这个我刚才就试过了

Answer 4

stringReplace(edit1.Text,'  ',' ', []);通过，请问[]是什么意思？？

Answer 5

[]就是可以不用条件去选择；后面参数要用[]括起来：
[]、[rfreplaceAll]、[rfignoreCase]、[rfreplaceAll, rfignoreCase]
cxtj:=cxtj+stringReplace(edit1.Text,'  ',' ',[rfreplaceAll]);

Answer 6

谢了 weizi2000(秋风啊) ( )