[函數] Firemonkey 各平台 "简体" / "繁体" 判断

转载于 2016-03-24 18:36:00 发布 · 80 阅读

0 ·

CC 4.0 BY-SA版权

原文链接：http://www.cnblogs.com/onechen/p/5316660.html

文章标签：

#移动开发

本文介紹了在 Delphi10Seattle 的 TLang 中如何通過編寫特定函數來判斷系統語言是否為繁體或簡體中文。此函數適用於不同的操作系統和設備，包括 OSX、iOS 和 Android 平台。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

目前的 Delphi 10 Seattle 的 TLang 尚不支持取得简体及繁体的语系字符，在能取得正确的语系字符后（整理中），才能使用下列函数判断：

function ChineseLang(const Str: String): String;
begin
  // 繁體
  if (Str.IndexOf('zh-Hant') = 0) // OSX & iOS
  or (Str = 'zh-TW') // OSX & iOS
  or (Str = 'zh-HK') // OSX & iOS
  or (Str = 'zh-MO') // OSX & iOS
  or (Str = 'zh_TW') // Android
  or (Str = 'zh_HK') // Android
  or (Str = 'zh_MO') // Android
  then Result := '是繁體' else

  // 簡體
  if (Str.IndexOf('zh-Hans') = 0) // OSX & iOS
  or (Str = 'zh-CN') // OSX & iOS
  or (Str = 'zh-SG') // OSX & iOS
  or (Str = 'zh_CN') // Android
  or (Str = 'zh_SG') // Android
  then Result := '是简体';
end;