delphi - FireMonkey:如何将下一个控件聚焦在vkReturn上？

Question

Classic VCL question ...但是如何在 FireMonkey 中执行相同的操作？

我有几个标准的TControl，他们可以集中精力...

例如，在某些TEdit中，如果按返回键，我想移动到下一个可聚焦控件

我尝试了不同的方法，但没有成功(将键、keychar 替换为 9，当它是 13 时，...，将键事件转发到表单，...)

当然，因为它是 FMX，我想要一个适用于所有平台的解决方案......

如果可以避免:

• 浏览 parent 的 child 属性(property)，
• 使用不同的代码来应对不同的平台
• 对制表符序列进行硬编码
• ...，那会很棒；o)

Answer 1

您可以将以下代码放入表单的 OnKeyDown 事件中:

  if Key = vkReturn then begin
    Key := vkTab;
    KeyDown(Key, KeyChar, Shift);   
  end;

如果您只希望某些控件具有该行为，则必须在这些控件的 OnKeyDown 事件中调用此代码。

请注意，KeyDown 必须调用 TForm.KeyDown 才能使其工作。

(使用XE2测试)