Is there any function/procedure as ReplaceString but for whole words on Delphi?

问题

Is there any function/procedure as ReplaceString but for whole words on Delphi? I just need to replace substring to the new one when it's a whole word. For example:

substring - > newstring
substring, -> newstring
substring123 -> substring

回答1:

You can use the built-in regex library to do this. For example:

{$APPTYPE CONSOLE}

uses
  System.RegularExpressions;

const
  InputString = 'a Substring, substring123, some more text';

begin
  Writeln(TRegEx.Replace(InputString, '\bsubstring\b', 'newstring', [roIgnoreCase]));
end.

来源：https://stackoverflow.com/questions/25852384/is-there-any-function-procedure-as-replacestring-but-for-whole-words-on-delphi