frame如何访问承载它的form上的方法或控件

frame怎么访问承载它的form上的方法或控件？
frame怎么访问承载它的form上的方法或控件？

[解决办法]
不建议这样使用，因为这样Frame和Form的耦合性就高了。如果非要这么用，试试下面的方法吧：

uses unit1;
{$R *.dfm}

procedure TFrame2.Button1Click(Sender: TObject);
begin
ShowMessage((Parent as TForm1).button1.caption);
end;