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

上一篇:HDU-1251 统计难题,字典树或者map!


下一篇:Nginx+Keepalived 实现双击热备及负载均衡