Ungefähr so?
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
FFrame.Free;
if Sender = Button1 then
FFrame := TFrame1.Create(Self)
else
FFrame := TFrame2.Create(Self);
FFrame.Align := alClient;
FFrame.Parent := Panel1;
end;
Diesen Handler einfach beiden Buttons zuweisen.
FFrame: TFrame ist eine private Variable in TForm1.