窗体的滚动条问题
我动态在ＰＡＮＥＬ上嵌套了个窗体，但由于ＰＡＮＥＬ太小，不能把窗体的整个界面显示在ＰＡＮＥＬ上．不知道如何使得ＰＡＮＥＬ上自动有滚动条生成,使得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;