Проверил. Да, обрабатывает. Но!
Мне нужно нажимать на стрелочки. А на форме есть несколько буттонов. При нажимании стрелочек по кнопкам-буттонам бегает выделение (пунктирная рамка), а нужная процедура не вызывается.

otaku, умник блин =)
вот я чо написал:

void __fastcall TForm1::FormKeyPress(TObject *Sender, char &Key)
{
if (Key==VK_UP) Button5Click(Sender);     //это не работает
if (Key==VK_ESCAPE) Close();     //а это работает
}

VK_UP, VK_ESCAPE и т.д. - это чар?:)))))))))))))

Код огромный и сюда постить смысла нет.
Для примера: создаём новый application, накидываем на форму 2-3 кнопки, выставляем у них TabStop равным false. У формы ставим KeyPreview в значение true. В событии OnKeyPress у формы пишем код:

if (Key==VK_UP) ShowMessage("Ok");
if (Key==VK_ESCAPE) ShowMessage("Ok");

Запускаем. Жмём Esc, получаем мессагу "Ок". Жмём стрелочку вверх - не работает. Если нажать на кнопку и понажимать стрелку вверх, по кнопкам всёравно бегает выделение, мессага всёравно не показывается.

Le_Hash написал(а):

Мне подсказали, что это через ApplicationEvents делается, а я осилить не могу =)

Вот вопрос собственно в этом: как это сделать через событие onMessage элемента ApplicationEvents?
З.Ы. Как юзают отладку?))

Le_Hash написал(а):

Запускаем. Жмём Esc, получаем мессагу "Ок". Жмём стрелочку вверх - не работает. Если нажать на кнопку и понажимать стрелку вверх, по кнопкам всёравно бегает выделение, мессага всёравно не показывается.

Если этот код засунуть в KeyUp, то все будет работать. А KeyPress и KeyDown почему-то стрелочки не обрабатывают.

если не умеешь чтать хелп, держи:

Occurs when key pressed.

Delphi syntax:

type TKeyPressEvent = procedure (Sender: TObject; var Key: Char) of object;
property OnKeyPress: TKeyPressEvent;

C++ syntax:

typedef void __fastcall (__closure *TKeyPressEvent)(System::TObject* Sender, char &Key);
__property TKeyPressEvent OnKeyPress = {read=FOnKeyPress, write=FOnKeyPress};

Description

Use the OnKeyPress event handler to make something happen as a result of a single character key press.

The Key parameter in the OnKeyPress event handler is of type Char; therefore, the OnKeyPress event registers the ASCII character of the key pressed. Keys that don't correspond to an ASCII Char value (Shift or F1, for example) don't generate an OnKeyPress event. Key combinations (such as Shift+A), generate only one OnKeyPress event (for this example, Shift+A results in a Key value of “A” if Caps Lock is off). To respond to non-ASCII keys or key combinations, use the  OnKeyDown or OnKeyUp event handlers.

тебе юзать надо не OnKeyPress, а OnKeyUp или OnKeyDown

Occurs when the user releases a key that has been pressed.

Delphi syntax:

type
  TKeyEvent = procedure (Sender: TObject; var Key: Word; Shift: TShiftState) of object;
property OnKeyUp: TKeyEvent;

C++ syntax:

typedef void __fastcall (__closure *TKeyEvent)(System::TObject* Sender, Word &Key, Classes::
TShiftState Shift);
__property TKeyEvent OnKeyUp = {read=FOnKeyUp, write=FOnKeyUp};

Description

Use the OnKeyUp event handler to provide special processing that occurs when a key is released. The OnKeyUp handler can respond to all keyboard keys, including function keys and keys combined with the Shift, Alt, and Ctrl keys.

The TKeyEvent type points to a method that handles keyboard events. The Key parameter is the key on the keyboard. For non-alphanumeric keys, you must use virtual key codes to determine the key pressed. For more information, see Virtual Key codes.

The Shift parameter indicates whether the Shift, Alt, or Ctrl keys are combined with the keystroke.

PS Можно сделать и по событию OnShortCut и по OnMessage, мо много еще как извратиться)))

Le_Hash, ну хз почему работает)) у меня в Делфе не пашет)))
Говорю, работай с собитием OnKeyUp и все будет норм)))
если надо могу более навороченные варианты написать:)))