使用'|'替換所有的內容

代碼：

program Project1;{$APPTYPE CONSOLE}usesSystem.SysUtils, System.RegularExpressionsCore;varreg: TPerlRegEx;begintryreg := TPerlRegEx.Create;with reg dobeginSubject := 'fafds23423vdadfa';Writeln('替換前 : ' + Subject);RegEx := '.';Replacement := '|';ReplaceAll;end;Writeln('替換后 : ' + reg.Subject);FreeAndNil(reg);Readln;excepton E: Exception doWriteln(E.ClassName, ': ', E.Message);end;end.

結果：

轉載于:https://www.cnblogs.com/cause/p/3676099.html

總結

以上是生活随笔為你收集整理的003.XE3包含了TPerlRegEx的单元的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。