Содержание прямого или обратного набора

[Big-kit]

Всем здравствуйте! Подскажите, пожалуйста, как решить такую задачку: вводится слово в edit. Оно не должно содержать подряд 3 и более символов из прямого или обратного алфавитного набора (например: “абвгде” или “едгвба”), а также обратного набора с клавиатуры (например: “qwerte” или “ytrewq”). Спасибо!

[ArtInt]

Первое, что приходит на ум это сделать массив с этим алфавитом. Потом сделать специальную процедуру, которая проверяет совпадает ли какая либо последовательность. И вызывать данную процедуру или функцию при подтверждении ввода слова в Edit.