Перехват курсорных клавиш I
Вы должны перехватывать и обрабатывать сообщение WM_GETDLGCODE. Объявите обработчик сообщения в вашем компоненте (в секции protected будет в самый раз)
procedure WMGetDlgCode(var Msg : TMessage); message WM_GETDLGCODE; |
и реализуйте его:
procedure TMyControl.WMGetDlgCode(var Msg : TMessage); begin Msg.Result := DLGC_WANTARROWS; end; |
Cheers, Julian (TeamB & TurboPower Software) [000476]