string - 是否存在与 unicode 字符串等效的 ContainsStr？

Question

今天我在我们的代码中修复了一些警告，其中之一是函数中的“ W1058 Implicit string cast with potential data loss from 'string' to 'AnsiString'”。ContainsStr

在搜索了一段时间后，我决定在这里询问此函数的等效函数，该函数将两个 unicode 字符串作为参数。我希望找到类似ContainsWideStr（对于 Delphi 2007 及更低版本）或ContainsUnicodeStr（对于 Delphi 2009+）的东西，但我找不到任何这些。

我知道我可以自己做这样的事情：

function ContainsUnicodeStr(const AText, ASubText: String): Boolean;
begin
  Result := Pos(ASubText, AText) > 0;
end;

但是，我想避免重复已经在 Delphi 中的代码，但我根本不知道在哪里。

Answer 1

根据文档，StrUtils.ContainsStr使用 Unicode。但当然AnsiStrings.ContainsStr不是。