[Nyctos Kasignete]

Тогда код в сообщении #2 должен подойти... Строками сделать проще (с IndexOf). Еще проще, если сделать алфавит перечислимым типом. Тогда можно пользоваться функцией Ord.