Передача фокуса компонентам

[arriah]

Здравствуйте,

есть такой вопрос по поводу передачи фокуса контролам.
На форме имеется grid, Tchromium пара едитов, мемо и 4 кнопки.
Мне надо передавать фокус между гридом и хромиумом по кнопке Tab
Если в гриде есть TabOrder, то в хроме он отсутствует.
В идеале было бы с грида по VK_RIGHT передать фокус в браузер (это не трудно сделать), а вот как обратно? В TChromium нет события OnKeyDown, есть только OnKeyEvent - но как мне перехватить нажатие кнопки влево, чтобы отдать фокус гриду?

[arriah]

Разобрался с OnKeyEvent, если надо кому, то вот примерно так:

Код: Выделить всё

procedure TForm1.Chromium1KeyEvent(Sender: TObject; const Browser: ICefBrowser;
  const event: PCefKeyEvent; osEvent: TCefEventHandle; out Result: Boolean);
begin
  if (event^.windows_key_code=VK_LEFT) then
  DBGrid1.SetFocus;
end;