如何在运行时删除 TFlowLayout 的所有项目?

问题描述

我想在运行时清除 FlowLayout,是否有函数可以做到这一点? 我想映射它的所有项目和免费主题,但我不知道如何访问它的项目,请提供任何代码示例?

解决方法

使用 ChildrenChildrenCount 属性,您可以以相反的顺序释放项目

for i := FlowLayout1.ChildrenCount-1 downto 0 do
  FlowLayout1.Children[i].Free;

或按正向顺序(重复寻址索引为 0 的项目)

for i := 0 to FlowLayout1.ChildrenCount-1 do
  FlowLayout1.Children[0].Free;