Acceder desde un Frame a su formulario

[[Lepe]]

Hazle un evento al frame, ya que si son 3 Forms donde los usas tendrías que hacer referencia a los 3 forms... y claro, se acabó el encapsulamiento:

Código Delphi [-]

TFrame1 = classs(...)
private
   FCancelar: TnotifyEvent;

public
   property OnCancelar:TnotifyEvent read FCancelar write FCancelar;

end;

implementation

procedure TFrame1.ButtonCancelar(...);
begin
  if Assigned(FCancelar) then
    FCancelar(self);
end;

Ya en el form donde usas los frames:

Código Delphi [-]
Tform1 = classs(tform);
private
  procedure AlCancelar(Sender:TObject);
end;

procedure TForm1.Form1Create();
begin
   Frame1.OnCancelar := AlCancelar;
end;


procedure TForm1.AlCancelar(Sender:TObject);
begin
  panel1.Enabled := false;
end;

Creo que no me equivocado en nada, debería compilar y ejecutar.

Saludos