FormKeyDown.pas

procedure TfVKLogger.FormKeyDown(
  Sender: TObject;
  var Key: Word;
  var KeyChar: Char;
  Shift: TShiftState);
begin
  if Key = vkReturn then          // if Return pressed
  begin
    Key := vkTab;                 // change the key to a Tab (causes navigation)
    KeyDown(Key, KeyChar, Shift); // execute the form's keydown to effect navigation
  end;
end;