Question

我在Delphi FireMonkey应用程序中使用TVertScrollBox，该应用程序需要在Android，iOS和Win32上运行。我的应用程序在Win32上工作正常，也就是说，当盒子大于可用区域时，我得到一个滚动条，我可以滚动它。

然而，在Android上，该框只显示尽可能多的项目，但拒绝滚动。预期的行为是我可以在框内拖动一个点并使框滚动。

以下是相关代码：

with TVertScrollBox.Create( Self ) do
begin
  Parent := Self;
  Align := TAlignLayout.alClient;

  // AddObject several times here...      

  UpdateStyle();

  Visible := True;
end;

Answer 1

您必须确保放在VertScrollbox中的组件/对象比VertScrollBox更高。

如果VertScrollBox中的组件更小或更短，则VertScrollBox不会产生任何影响

用TVertScrollBox.Create（Self）做开始父母：=自我; 对齐：= TAlignLayout.alClient;

//这里多次添加AddObject ...
//尝试将yourobject.Height设置为TVertScrollBox.Height * 2 //将yourobject与alTop对齐

UpdateStyle（）;

可见：=真; 端;

我的TVertScrollBox不想在Android上滚动

1 个答案: