چگونگي استفاده از Tframe

از دوستان خواهش ميكنم اگه بتونن جواب منو بدن

من يه فرم اصلي دارم كه Gropbox1 در داخلش است چطوري ميتونم Frame هايي رو كه ساختم از داخل برنامه insert يا Remove كنم

من از ذستورات زير استفاده كردم
:
new:Tfram:

begin
new:=Tfram2.create(Gropbox1);
Gropbox1.insertcontrol(new)
new.show;

ولي مشكل جايي هست كه ميخوام اينو حذف و فرام ديگري رو شو كنم
لطفا راهنمايي كنيد

کد:

---

type
  TFrameClass = Class of TFrame;
 
var
  ActiveFrame : TFrame;
 
procedure ShowFrame(FrameClass: TFrameClass; AParent: TWinControl);
begin
  if Assigned(ActiveFrame) then
    FreeAndNil(ActiveFrame);
  ActiveFrame := FrameClass.Create(nil);
  ActiveFrame.Parent := AParent;
  ActiveFrame.Show;
end;

---

مثال استفاده:

کد:

---

ShowFrame(TFrame2,GroupBox1);

---