ansi_to_oem('ё') Runtime Error Опции

[klem4]

Есть ф-я

function ANSI_to_OEM(s: Char): Char;
begin
  case s of
    'А'..'п': dec (s, 64);
    'р'..'я': dec (s, 16);
     'Ё','Є': inc (s, 72);
     'ё','є': inc (s, 57);
         'Ї': inc (s, 69);
         'ї': inc (s, 54);
  end;
  ANSI_to_OEM := s;
end;

Следующий вызов:

ansi_to_oem('ё')

приводит FPC в ужас.

Почему ?!

[klem4]

У меня RTE 215 ... А какой символ выдает прога ? 'ё' или что-то другое ?

[compiler]

тут еще что то есть... если переменную(русскую) для функции читаем с клавы , то выводится первый символ названия переменной(!)
ничего не понимаю