macos – 如何在OSX Yosemite上以不区分大小写的方式比较文本

发布时间：2020-12-15 09:45:39 所属栏目：大数据来源：网络整理

导读：我正在尝试使用AnsiSameText以不区分大小写的方式比较OSX上的两个字符串.这曾经工作得很好,但是在OSX Yosemite上,如果OSX的“首选语言”设置为荷兰语(“系统偏好设置” – “语言和地区” – “首选语言” – “荷兰荷兰人“). 在下面的代码示例中,我希望它

我正在尝试使用AnsiSameText以不区分大小写的方式比较OSX上的两个字符串.这曾经工作得很好,但是在OSX Yosemite上,如果OSX的“首选语言”设置为荷兰语(“系统偏好设置” – >“语言和地区” – >“首选语言” – >“荷兰荷兰人“).

在下面的代码示例中,我希望它只打印“相同”.但我得到“相同,不同,不同”.

program Project2;

{$APPTYPE CONSOLE}

{$R *.res}

uses
  System.SysUtils;

begin
  if AnsiSameText('abcde','ABCDE') then // Same
    WriteLn('Same')
  else
    WriteLn('Different');

  if AnsiSameText('abcdefghijklmnopqrstuvwxyz','ABCDEFGHIJKLMNOPQRSTUVWXYZ') then // different
    WriteLn('Same')
  else
    WriteLn('Different');

  if AnsiSameText('i','I') then // different
    WriteLn('Same')
  else
    WriteLn('Different');
end.

以不区分大小写的方式比较文本的正确方法是什么？

我正在使用Delphi XE7.

解决方法

Delphi使用CFLocaleCopyCurrent返回的值初始化UTF8CompareLocale.在AnsiSameText中使用UTF8CompareLocale作为用于不区分大小写的比较的区域设置.但是,如果OSX的语言设置为荷兰语,OSX Yosemite认为“我”和“我”不同.

调用SetUTF8CompareLocale(‘en_US’);在荷兰语系统上修复问题而无需修补Delphi单元.

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!