Delphi中StringReplace函数的使⽤function StringReplace(const S, OldPattern, NewPattern: string; Flags: TReplaceFlags): string;
const S：原来的字符串 OldPattern：需要被替换的部分 NewPattern：替换后的部分 Flags：替换标识，
定义如下： type TReplaceFlags = set of (rfReplaceAll, rfIgnoreCase);
rfReplaceAll：全部替换
rfIgnoreCase：忽略⼤⼩写
具体⽤法如下： StringReplace(原来的字符串，需要被替换的部分，替换后的部分，[rfReplaceAll])
例⼦：
procedure TForm1.Button1Click(Sender: TObject);
var s:string;
begin
s:=edit1.Text;
replaceall()s:=StringReplace(S,#32,'',[rfReplaceAll]);
s:=StringReplace(S,#9,'',[rfReplaceAll]);
edit1.Text:=s;
end;
end.

版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。