Отловить и заблокировать ввод клавиши (Delphi)

Задание простое - необходимо отловить и заблокировать ввод клавиши. Пишу свою авто замену, авто ввод - написав две буквы выпадает список с моим предлагаемыми вариантом слов, стрелками вверх, вниз выбираю нужное и жму Enter слово вставляется вместо тех двух букв. Работа происходит в блокноте, когда выпадает список он активным не становится! Активный всегда блокнот, ПРОБЛЕМА - КОГДА ЖМУ СТРЕЛКИ ВЕРХ, ВНИЗ, Enter  - при отображенном списке, в блокноте эти клавиши должны быть заблокированными.