Delphi：阻止我的TEdit的Android键盘

我正在构建一个移动应用程序，我有一个包含大量TEdit的框架，因此当我点击底部页面附近的TEdit时，键盘将阻止用户无法看到其输入值的TEdit。我能做些什么来避免这种情况？以下是我尝试的代码：

仅供参考，在我的框架中，我将所有项目安排在一个列表框1中。我的手机键盘唯一的障碍就是百分比编辑。我想做的是，当我点击百分比编辑时，键盘会显示在百分比编辑框的下方

procedure TProfileFrame.VirtualKeyboardHidden(Sender: TObject;
  KeyboardVisible: Boolean; const Bounds: TRect);
begin
  ListBox1.Margins.Bottom := 0;
end;

procedure TProfileFrame.VirtualKeyboardShown(Sender: TObject;
  KeyboardVisible: Boolean; const Bounds: TRect);
begin
  ListBox1.Margins.Bottom := Bounds.Height;
  if Assigned(percentage_edit) and percentage_edit.IsFocused then ListBox1.ScrollToItem(ListBoxItem12);

end;

---

你能描述一下当你使用这个代码时实际发生了什么吗？什么都没有发生。。。因为我看到ppl在这个场景中使用了这个，但是我不知道我的错误在哪里，这个问题没有一个简单的答案。键盘在屏幕上占据了固定的空间，因此如果不被键盘阻挡，控件必须向上移动。本演示展示了一种方法。你能描述一下当你使用这个代码时实际发生了什么吗？什么都没有发生。。。因为我看到ppl在这个场景中使用了这个，但是我不知道我的错误在哪里，这个问题没有一个简单的答案。键盘在屏幕上占据了固定的空间，因此如果不被键盘阻挡，控件必须向上移动。本演示展示了一种方法。