delphi 是否可以在TFlowLayout中使用TVertScrollBox在FireMonkey中进行垂直滚动?

34gzjxbg  于 2022-11-23  发布在  其他
关注(0)|答案(2)|浏览(239)

我正在开发新的FMX项目,需要使用TFlowLayout
没有更多的空间用于当前项目计数。我决定使用TVertScrollBox,但它不起作用。
是否有任何方法可以将TFlowLayout与垂直滚动一起使用?

eaf3rand

eaf3rand1#

当然,这样可以正常工作。要进行测试,请启动一个新的空白FMX项目,将一个TVertScrollBox放在窗体上,并将一个TFlowlayout放在TVertScrollbox内。使用结构视图确保TFlowlayout位于TVertscrollbox内。
现在,调整TFlotlayout组件的大小,您甚至可以在IDE中垂直滚动。
我很快在柏林10. 1更新2中尝试了这个,它的效果和预期的一样。
您没有发布任何代码,但如果您在运行时向TFLowLayout添加对象,则需要创建一个AutoSize函数,该函数将调整TFlowLayout的高度,使其足够容纳所有子对象,并将TFlowLayout与TVertScrollbox的顶部对齐。如果您不知道如何实现AutoSize函数,我建议您发布一个带有示例代码的单独问题。

jqjz2hbq

jqjz2hbq2#

若要确保FlowLayout在VertScrollBox内滚动,请设置FlowLayout.Align:=alTop not alClient,因为在这种情况下,FlowLayout的高度将始终绑定到其父级的高度。超出此高度的所有内容都将被剪切。

相关问题