由于TFlowPanel中沒(méi)有設(shè)置滾動(dòng)條的相關(guān)屬性。所以我們只好另辟溪徑。再加一個(gè)tscrollbox來(lái)實(shí)現(xiàn)。

具體操作如下：

1，先添加一個(gè)Tscrollbox,設(shè)置其align為alclient。autosize默認(rèn)為false,不用改動(dòng)。

2,在其中添加一個(gè)tflowpanel,設(shè)置align為altop,autosize為true,autowrap為true。在這其中一定要將align設(shè)置為altop,如果設(shè)置為其它都不會(huì)有滾動(dòng)條的。

實(shí)際實(shí)驗(yàn)時(shí)，tflowpanel不起作用。而用trzflowpanel時(shí)，沒(méi)問(wèn)題。

還有一點(diǎn)需要注意的是，當(dāng)改變tflowpanel的大小時(shí)，其中的控件不能自動(dòng)重排。需要重寫根據(jù)情況定義下tflowpanel的寬度才行。

如改變窗口大小時(shí)，在onresize中加上：flowpanel1.width:=self.clientwidth;

總結(jié)

以上是生活随笔為你收集整理的Delphi中TFlowPanel实现滚动条效果的全部?jī)?nèi)容，希望文章能夠幫你解決所遇到的問(wèn)題。

如果覺(jué)得生活随笔網(wǎng)站內(nèi)容還不錯(cuò)，歡迎將生活随笔推薦給好友。