目前的 Delphi 10 Seattle 的 TLang 尚不支持取得简体及繁体的语系字符，在能取得正确的语系字符后（整理中），才能使用下列函数判断：
ChineseLang(
(Str.IndexOf() = )
(Str = )
(Str = )
(Str = )
(Str = )
(Str = )
(Str = )
Result :=
<span style="color: #0000ff;">if (Str.IndexOf(<span style="color: #800000;">'<span style="color: #800000;">zh-Hans<span style="color: #800000;">') = <span style="color: #800080;">0) <span style="color: #008000;">//<span style="color: #008000;"> OSX & iOS
<span style="color: #0000ff;">or (Str = <span style="color: #800000;">'<span style="color: #800000;">zh-CN<span style="color: #800000;">') <span style="color: #008000;">//<span style="color: #008000;"> OSX & iOS
<span style="color: #0000ff;">or (Str = <span style="color: #800000;">'<span style="color: #800000;">zh-SG<span style="color: #800000;">') <span style="color: #008000;">//<span style="color: #008000;"> OSX & iOS
<span style="color: #0000ff;">or (Str = <span style="color: #800000;">'<span style="color: #800000;">zh_CN<span style="color: #800000;">') <span style="color: #008000;">//<span style="color: #008000;"> Android
<span style="color: #0000ff;">or (Str = <span style="color: #800000;">'<span style="color: #800000;">zh_SG<span style="color: #800000;">') <span style="color: #008000;">//<span style="color: #008000;"> Android
<span style="color: #0000ff;">then Result := <span style="color: #800000;">'<span style="color: #800000;">是简体<span style="color: #800000;">'<span style="color: #000000;">;
<span style="color: #0000ff;">end;
<span style="color: #008000;">//
<span style="color: #008000;"> 簡體<span style="color: #0000ff;">if (Str.IndexOf(<span style="color: #800000;">'<span style="color: #800000;">zh-Hans<span style="color: #800000;">') = <span style="color: #800080;">0) <span style="color: #008000;">//<span style="color: #008000;"> OSX & iOS
<span style="color: #0000ff;">or (Str = <span style="color: #800000;">'<span style="color: #800000;">zh-CN<span style="color: #800000;">') <span style="color: #008000;">//<span style="color: #008000;"> OSX & iOS
<span style="color: #0000ff;">or (Str = <span style="color: #800000;">'<span style="color: #800000;">zh-SG<span style="color: #800000;">') <span style="color: #008000;">//<span style="color: #008000;"> OSX & iOS
<span style="color: #0000ff;">or (Str = <span style="color: #800000;">'<span style="color: #800000;">zh_CN<span style="color: #800000;">') <span style="color: #008000;">//<span style="color: #008000;"> Android
<span style="color: #0000ff;">or (Str = <span style="color: #800000;">'<span style="color: #800000;">zh_SG<span style="color: #800000;">') <span style="color: #008000;">//<span style="color: #008000;"> Android
<span style="color: #0000ff;">then Result := <span style="color: #800000;">'<span style="color: #800000;">是简体<span style="color: #800000;">'<span style="color: #000000;">;
<span style="color: #0000ff;">end;