Перевод строки в нижний регистр

[rareMax]

Вот вам задачка для самых маленьких. Как думаете - что будет записано в aT, если передать, например, строку: "рОль, в которой винни-пух был на высоте" после этого кода:

procedure TvicDBv1.FindAnswer(const Question: string);
var
  I: Integer;
  aQ, aA, aT: String;
begin
  aT := LowerCase(Question);
  for I := 0 to fFile.Count - 1 do
  Begin
  ...... 
  End;
end;

Лично я думал что будет записано "роль, в которой винни-пух был на высоте". Но ехидная RAD X выдает следующее:

 

Что за чудеса?

[Равиль Зарипов (ZuBy)]

LowerCase(Label1.Text, TLocaleOptions.loUserLocale)

Изменено 18 сентября, 2015 пользователем ZuBy

[Andrey Efimov]

AnsiLowerCase(Question);