怎样在一个Panel中切换显示多个Frame,急!
有一个主Form和若干个Frame, 如Frame1、Frame2、Frame3、Frame4……
我想在Form中通过多个按钮在一个Panel中切换显示各个Frame
请高手指教,请说详细点,在线等,谢谢!
我现在对各个按钮使用的是如下代码:
void __fastcall TForm1::Button1Click(TObject *Sender)
{
Frameup=NULL;
Frameup=new TFrame1(this);
Frameup-> Parent=Panel1;
Frameup-> Align=alClient;
}
不过在点击同一个铵钮两次后就提示出错,如:
a component named Frame2 already exists
[解决办法]
两种方法:
一、使用PageControl,设置每个TabSheet 的TabVisible = false
二、
void __fastcall TForm1::Button1Click(TObject *Sender)
{
static int FrameupCd= 10;
Frameup=NULL;
Frameup=new TFrame1(this);
Frameup-> Name = "MyFrameup " + AnsiString(FrameupCd++);
Frameup-> Parent=Panel1;
Frameup-> Align=alClient;
}
[解决办法]
up
[解决办法]
void __fastcall TForm1::Button2Click(TObject *Sender)
{
if(Frameup)
Frameup-> Free();
//Frameup=NULL;
Frameup=new TFrame2(this);
Frameup-> Name = "MyFrameup " + AnsiString(FrameupCd++);
Frameup-> Parent=Panel1;
Frameup-> Align=alClient;
}
如果显示没问题, 那就是没问题了.
结贴吧.