[lmikle]

Да, что-то я убежал мыслью вперед. Должно быть:

Код:

const
  CodeTable : Array [65..66] Of Char = ('T','M');