Преобразовать строку к нижнему/верхнему регистру

[Utkin]

Делфи ХЕ3. Стринги стали юникодовыми и потому столкнулся с банальной проблемой. Мне нужно сравнить две строки без учета регистра. Какую функцию заюзать?

[Вадим Мошев]

function AnsiSameText(const S1, S2: string): Boolean;

[Utkin]

Напомню на всякий случай строки юникодовы.

[Вадим Мошев]

Хм... а это не работает для юникодовых строк?

может, поможет преобразование строк между регистрами?

функция AnsiLowerCase(const S: String): String
Возвращает строку S, преобразованную к нижнему регистру.

функция AnsiUpperCase(const S: String): String
Возвращает строку S, преобразованную к верхнему регистру

Источник: http://www.delphi-manual.ru/work-with-strings.php

[Человек_Борща]

Стринги стали юникодовыми и потому столкнулся с банальной проблемой. Мне нужно сравнить две строки без учета регистра.

Не улавливаю связи.

Что мешает:
CompareStr(LowerCase(1),LowerCase(2 )) = 0 ?

Для декодирования строк используйте TEncoding.

[Utkin]

Ansi не совместим с UTF.
Спасибо за участие, нужно было заюзать строковой хелпер. В нем есть методы преобразования и к верхнему и к нижнему регистру

LowerCase

Я не знаю корректна ли она с юникодовыми строками. Эмбекадеро клянется что старые функции должны работать, но когда происходит преобразование спецсимволов типа перевода строки результат иногда содержит лишние символы. Но все равно спасибо за предложенный вариант.

[Человек_Борща]

Вот вам перевод ANSI к UNICODE

function AnsiStr2Str(const aStr: AnsiString): string;
begin
  Result := StringOf(TEncoding.Convert(TEncoding.ANSI, TEncoding.Unicode, BytesOf(aStr)));
end;

[Троллинг]

Делфи ХЕ3. Стринги стали юникодовыми и потому столкнулся с банальной проблемой. Мне нужно сравнить две строки без учета регистра. Какую функцию заюзать?

Пример1.
if widelowercase('str1')=widelowercase ('str2') then
...

вместо widelowercase сойдет в принципе и ansilowercase. Но никак не lowercase, она обрабатывает только семибитный текст.

пример2.

if lstrcmpi(pchar('str1'),pchar('str1' ))=0 then
...