这样的界面如何做？？？(100分)

一窗体form1，左面有btn1,btn2......btn10一共十个按钮

按下btn1，form1的右面出现10个edit
按下btn2,form1的右面出现另10个edit，上10个edit不可见
……
按下btn10,form1的右面出现另外的10个EDIT，上10个edit不可见


请问，这些edit如何安排？
总不会全部都放在form1的右边吧？？？一共要100(只是为了表示多)个啊

如何解决？

用groupbox就可以解决啊

呵呵，你可以在右边放十个大小一样的Panel，上面放10个edit，然后每一个Panel与一
个button对应，每次只有一个Panel.BringTofront不就可以了，而且不会有刷新的感觉。

用TNoteBook控件。

楼上，用panel设计时累死。
我用的pagecontrol。

放10个edit就够用了，按下btn1给他们赋值，按下btn2就重新给他们赋值，以此类推

cb_hfxy

我跟你的想法相同，不过有没有更好的解决

不就是一个重新定位的问题吗

to weiiguo
详细一点可以吗？

use source
采用函数来creat button

你可以设置一个childform子窗体,在放10的button的窗体上,放一个panel,再建几个form
把每10个Edit放在一个form中,TFrmform1 = class(TFrmChildForm),你在放button的窗体的代码中加入
代码: TActiveFormType = (acform1,acform2,acform3,form4);
private
ActiveForm: TFrmChildForm;
ActiveFormType: TActiveFormType;
procedure SetActiveForm;
procedure TFrmmain.SetActiveForm;
begin
if Assigned(ActiveForm) then
begin
ActiveForm.Free;
ActiveForm:=nil;
end;
Panel1.Refresh;
case ActiveFormType of
acform1:
begin
ActiveForm:=TFrmform1.Create(Application,Panel1);
Frmmain.Menu:=TeachMenu;
end;
acform2:
begin
ActiveForm:=TFrmform2.Create(Application,Panel1);
end;
acform3:
ActiveForm:=TFrmform3.Create(Application,Panel1);
acform4:
ActiveForm:=form4.Create(Application,Panel1);
end;
if ActiveForm<>nil then
begin
ActiveForm.Show;
end;
end;
所有button的事件:
ActiveFormType:=TActiveFormType(TToolButton(Sender).tag);
SetActiveForm;
你必须设对tag值

TNoteBook 每页放10个edit,点击是把相应的页设为活动的即可！！！

TNoteBook 每页放10个edit,点击是把相应的页设为活动的即可！！！

接受答案了.

TNoteBook 每页放10个edit,点击是把相应的页设为活动的即可！！！