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; s:=StringReplace(S,#32,'',[rfReplaceAll]); s:=StringReplace(S,#9,'',[rfReplaceAll]); edit1.Text:=s; end; end.

转载于:https://www.cnblogs.com/lonsine/p/3290200.html

• 点赞
• 收藏
• 分享
• 文章举报

dibaifang3806 发布了0 篇原创文章 · 获赞 0 · 访问量 60 私信 关注