Delphi XE8中的正则表达式提取日语（平假名，片假名，汉字）

本文整理自网络，侵删。

 
使用Delphi XE8中的正则表达式提取日语（平假名，片假名，汉字）

您可以在正则表达式中使用以下字符：

平假名... \ p {平假名} 
片假名... \ p {假名} 
汉字... \ p {汉}

使用此提取平假名，片假名和汉字。

program Project1;

{$APPTYPE CONSOLE}
{$R *.res}

uses
  System.SysUtils, RegularExpressions;

const
  Target = '1あ2い3?ha字bカcナ';
  Pattern = '[\p{Hiragana}|\p{Katakana}|\p{Han}]';

var
  match: TMatch;
  matches: TMatchCollection;
begin
  matches := TRegEx.matches(Target, Pattern);
  for match in matches do
    WriteLn(Format('%s (%d, %d)', [match.Value, match.Index, match.Length]));
end.
执行结果

あ (2, 1)
い (4, 1)
?h (6, 1)
字 (8, 1)
カ (10, 1)
ナ (12, 1)
 

相关阅读 >>

Delphi winapi: getclassname - 获取指定窗口的类名

Delphi tstringlist删除重复项

dll 的静态调用实例代码

Delphi 服务端日志记录

Delphi 静态调用dll和动态调用dll优缺点

Delphi 如何在tmemo，tedit或trichedit中获得插入符的位置

Delphi xe10 对 json的解析应用

Delphi 2009 之 tballoonhint

Delphi 怎么将一个文件流转换成字符串？

dll与exe之间的恩爱情仇

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » Delphi XE8中的正则表达式提取日语（平假名，片假名，汉字）