2 つの AnsiString を比較して、テキストが同じかどうかを確認する必要があります (大文字と小文字は区別されません)。
var
text1, text2: AnsiString;
begin
if SameText(text1, text2) then
...
Unicode 以前の Delphi ではSameText
関数を使用していましたが、最新の Delphi では Unicode バージョンしかないためW1057 Implicit string cast from 'AnsiString' to 'string'
、呼び出し時に次の警告が表示されます。
私の質問は、コンパイラの警告を表示せずに (そして両方の文字列を不必要に にキャストすることなく)、最新の Delphi で AnsiStrings を適切に比較する方法ですUnicodeString(text)
。