如何在不知道名称的情况下访问组件的属性？

Question

有一种使用在运行时创建的组件的属性不知道它的名字呢？我的意思是你已经完成了这个。

with TPanel.Create(self) do 
    begin 
    Name := 'Panel' + IntToStr(ComponentCount + 1); 
    Height := 50; 
    Width := 100; 
    Top := 30; 
    Left := 30; 
    Parent := self; 
    end; 

Answer 1

声明类型为TPanel的变量并在该变量中存储对组件的引用。

var 
    Panel: TPanel; 
.... 
Panel := TPanel.Create(Self); 

然后，您可以使用此变量引用控件。

你可能会需要保持变量作为形式的成员字段，或者在一个阵列，或者确实有些其他容器。