窗体的滚动条有关问题

窗体的滚动条问题
我动态在ＰＡＮＥＬ上嵌套了个窗体，但由于ＰＡＮＥＬ太小，不能把窗体的整个界面显示在ＰＡＮＥＬ上．不知道如何使得ＰＡＮＥＬ上自动有滚动条生成,使得FORM2的所有界面全部显示在ＰＡＮＥＬ２上？


procedure Tform1.Showframeankaright(FormClass: TFormClass);
begin
  FCurForm := FormClass.Create(nil);
  with FCurForm do
  begin
  Parent := Panel2;
  Align := alClient;
  BorderStyle := bsNone;
  Show;
  end;
end;

在窗体调用时执行：
Showframeankaright(form2);

[解决办法]
简单的，可以在Panel上弄个ScrollBox,然后Parent := ScrollBox; 去掉Align := alClient; 改成Left := 0; top := 0;