Enlazar un formulario con un frame

[dec]

Hola,

Supongamos un "frame", un "formulario" y un "botón". Añadimos la unidad que implementa el "frame" en la unidad del formulario. Suponemos que ya se declara una variable "myFrame" en la unidad del "frame", de no ser así, podríamos declarar una variable local del tipo del "frame". Aprovechamos el evento "OnClick" del "botón" para crear una instancia del "frame", y se asignamos como "parent" al formulario "formulario".

Código Delphi [-]
unit UMyForm;

uses
  Forms, /* */;

interface

type
  TMyForm = class(TForm)
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  end;

uses
  UMyFrame;

implementation

procedure TMyForm.Button1Click(Sender: TObject);
begin
  myFrame := TFrame.Create(Self);
  myFrame.Parent := Self;
end;