Delphi 如何垂直滚动TFlowLayout内容？
我有一个包含5个相同大小控件的TFlowLayout。TFlowLayout（Align=Top）是TVertScrollBox的子项。使flowlayout变小时，所有5个控件都显示为一列。这个很好用。然而，当这5个控件不适合视图时，我希望TVertScrollBox能够启动并提供垂直滚动功能。 事实证明，TFlowLayout.Height属性未调整为与该列中显示的5个控件的高度相对应的新高度。Delphi 如何垂直滚动TFlowLayout内容？,delphi,layout,firemonkey,flowlayout,Delphi,Layout,Firemonkey,Flowlayout,我有一个包含5个相同大小控件的TFlowLayout。TFlowLayout（Align=Top）是TVertScrollBox的子项。使flowlayout变小时，所有5个控件都显示为一列。这个很好用。然而，当这5个控件不适合视图时，我希望TVertScrollBox能够启动并提供垂直滚动功能。 事实证明，TFlowLayout.Height属性未调整为与该列中显示的5个控件的高度相对应的新高度。 在这种情况下，提供垂直滚动的最佳方式是什么 解决了！我从TControl（TFlowLayout
在这种情况下，提供垂直滚动的最佳方式是什么 解决了！我从TControl（TFlowLayout的副本）继承了一个TMyFlowLayout，并将“Height:=CurPos.Y+LineHeight”作为最后一行添加到DoRealign。工作起来很有魅力！我将在EMBSResolved注册为功能请求！我从TControl（TFlowLayout的副本）继承了一个TMyFlowLayout，并将“Height:=CurPos.Y+LineHeight”作为最后一行添加到DoRealign。工作起来很有魅力！我将在EMB注册为功能请求