Question

delphi无法读取动态生成的控件

在pagecontrol的tabsheet中动态生成TRichEdit:
var
TextBox:trichedit;
begin
textbox:=trichedit.Create(PageControl1.Pages[0]); //AOwer和parent为self的时候却可以被components读取到
TextBox.Parent:=PageControl1.Pages[0];
TextBox.Left:=2;
TextBox.Top:=5;
TextBox.Width:=200;
TextBox.Height:=200;
TextBox.Visible:=True;
end;
procedure TForm1.Button1Click(Sender: TObject);
var i:Integer;
begin
for i:=0 to ComponentCount -1 do
begin
Memo1.Lines.Add(Components[i].Name); //无法读取richedit
end;
end;

Answer 1

这种动态生成的控件 是需要特殊的方式去读取的 显示查找对应的控制HANDEL 然后转换成对应的控件类型 才能有对应的操作

追问

用什么办法读取

追答

是先查找控件 然后转换控件对象的类型 最后操作读取等

Answer 2

在什么地方生成的动态控件？

追问

认真看代码

追答

这几行代码还要怎么认真看？