Перенос фокуса с одного компонента на другой в мобильном телефоне с помощью Delphi XE8

Question

Я разрабатываю мобильное приложение для Android с использованием Delphi XE8 и, пожалуйста, помогите мне выполнить следующую реализацию.

В форме у меня есть 3 компонента, которые имеют следующий порядок: 1. TEdit (edtValue1), 2. TEdit (edtValue2), 3. TComboBox (cbxValue1)

Когда форма открыта, я сделал:

edtValue.SetFocus;

Я сомневаюсь, что после ввода некоторых значений в edtValue1, то как я могу сместить фокус на edtValue2, нажав клавишу ввода на клавиатуре на мобильном телефоне Android. Кроме того, если мне нужно сместить фокус на cbxValue1 после edtValue2, то как я могу справиться и с этим? Пожалуйста, помогите мне в этом. Заранее спасибо.

Answer 1

Вот код, который работает для элементов управления, вы упомянули:

procedure TForm1.FormCreate(Sender: TObject);
begin
  edtValue1.SetFocus;
end;

procedure TForm1.edtValue1KeyUp(Sender: TObject; var Key: Word; var KeyChar: Char;
  Shift: TShiftState);
begin
  if Key = 13 then
    edtValue2.SetFocus;
end;

procedure TForm1.edtValue2KeyUp(Sender: TObject; var Key: Word; var KeyChar: Char;
  Shift: TShiftState);
begin
  MouseDown(TMouseButton.mbLeft, [], cbxValue1.AbsoluteRect.CenterPoint.X, cbxValue1.AbsoluteRect.CenterPoint.Y);
end;

Может быть, это немного обманывают, но у этого есть хорошие подсказки, чтобы исследовать.