如何在子窗体中访问主窗体的组件

ntcp

在子窗体中访问主窗体中的组件，实现代码如下：

procedure TCT1.Button1Click(Sender: TObject);
var
  lform : TMainForm;
begin
  lform := TMainForm.Create(self,context);  
  lform.Edit1.Text;  {访问主窗体中 Edit1 的 Text }
end;