DelphiStringReplace–替换字符函数Delphi中的StringReplace函数是SysUtils单元中⾃带的函数,该函数可以替换字符串中的指定字符。
function StringReplace (const S, OldPattern, NewPattern: string; Flags: TReplaceFlags): string;
// rfReplaceAll:全部替换
// rfIgnoreCase:忽略⼤⼩写
// For Example:
var
aStr: String;
begin
aStr := 'This is a book, not a pen!';
ShowMessage(StringReplace (aStr, 'a', 'two', []));//This is two book, not a pen!只替换了第⼀个符合的字
ShowMessage(StringReplace (aStr, 'a', 'two', [rfReplaceAll]));//This is two book, not two pen!替换了所有符合的字字符串replace函数
aStr := 'This is a book, not A pen!';
ShowMessage(StringReplace (aStr, 'a', 'two', [rfReplaceAll]));//This is two book, not A pen!只替换了符合的字(⼩写a)
ShowMessage(StringReplace (aStr, 'a', 'two', [rfReplaceAll, rfIgnoreCase]));//This is two book, not two pen!不管⼤⼩写替换了所有符合的字end;
版权声明:本站内容均来自互联网,仅供演示用,请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198,我们将在24小时内删除。
发表评论