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

时间:2017-02-18 07:38:43

标签: delphi

有没有办法在不知道名称的情况下使用在运行时创建的组件的属性?我的意思是你已经完成了这件事。

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

1 个答案:

答案 0 :(得分:7)

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

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

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

您可能需要将变量保存为表单的成员字段,或者保存在数组中,或者实际上是某个其他容器中。