Delphi中TFlowPanel实现滚动条效果


由于TFlowPanel中没有设置滚动条的相关属性。所以我们只好另辟溪径。再加一个tscrollbox来实现。

具体操作如下:

1,先添加一个Tscrollbox,设置其align为alclient。autosize默认为false,不用改动。

2,在其中添加一个tflowpanel,设置align为altop,autosize为true,autowrap为true。在这其中一定要将align设置为altop,如果设置为其它都不会有滚动条的。

实际实验时,tflowpanel不起作用。而用trzflowpanel时,没问题。

还有一点需要注意的是,当改变tflowpanel的大小时,其中的控件不能自动重排。需要重写根据情况定义下tflowpanel的宽度才行。

如改变窗口大小时,在onresize中加上:flowpanel1.width:=self.clientwidth;

http://blog.csdn.net/diligentcatrich/article/details/17302197


免责声明!

本站转载的文章为个人学习借鉴使用,本站对版权不负任何法律责任。如果侵犯了您的隐私权益,请联系本站邮箱yoyou2525@163.com删除。



 
粤ICP备18138465号  © 2018-2025 CODEPRJ.COM