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;