Неправильно.
Во-первых, нужно свойство KeyPreview формы установить в .T.
Тогда форма будет перехватывать нажатия на клавиши.
В методе KeyPress форма получает два аргумента: nKeyCode (код нажатой клавиши) и nShiftAltCtrl (значение в зависимости от того, нажата ли при этом Ctrl, Shift или Alt).
Далее в этом методе можно использовать CASE или IF по значению полученных аргументов для выполнения различных функций (в частности, приведённого выше кода).
В примере от CRIP, если KeyPreview=.F., ничего происходить не будет. Если KeyPreview=.T., то предложенный код будет срабатывать при нажатии на любую клавишу.
Если всё-таки нужно вызывать другой метод непосредственно из управляющего элемента (TextBox), то можно использовать метод InteractiveChange этого элемента. Возможно, при этом потребуется использовать NODEFAULT, если код клавиши не должен отображаться в поле ввода.

to CRIP:
Неправильно
Спасибо, учту на будущее. Если Вы, как профессионал, даёте кусок кода, который введёт спросившего в ещё большее затруднение - это как?

to CRIP:
Видите ли, коллега, по типу вопроса на этом форуме достаточно просто определить уровень спрашивающего. Если человек владеет ООП на уровне Fox2x, то всё-таки лучше дать ему конкретное (и правильное) решение. Кстати, я не привожу никакого кода, а только объясняю, как это сделать. Таким образом, спрашивающий не просто тупо вставил бы код в свою программу, а набрёл бы на некоторые мысли...

to Muric: Это никоим образом не относится к Вам. Ради бога, не примите на свой счёт. Но согласитесь, противно, когда на твой вопрос отвечают каракулями (есть один такой), причём с изрядной долей высокомерия.

Да, прав был Радищев... До сих пор существуют в России обозначенные им две проблемы...