Aus Frame heraus auf übergeordnete (haupt)Form zugreifen

[mkinzler]

Delphi-Quellcode:

procedure TFrameForm.Button1Click(Sender: TObject);
var parentForm: TControl;
begin
  parentForm := FrameForm.Parent;
  while not (parentForm is TForm) do
    parentForm := parentForm.Parent;  
  (parentForm as TForm).Caption := 'test erfolgreich';
end;

[Edit: is TMainForm]