我想要达到的要求是这样的:
窗口上有二个按纽和一人pagecontrol
button1,button2,pagecontrol1
在pagecontrol1中设计两个页面,一个为tablesheet1,另一个是tablesheet2,在tablesheet1上放一些控件,在tablesheet2上放一些控件,设置两个tablesheet的tablevisible为false
当点窗口上的button1的时候出现tablesheet1,并且上面的控件都有,点button2时出现tablesheet2,上面的控件要也有!我在
form.create上写
PageControl1.Pages[0].Show;
在启动是是可以显示出来的,而在button上写却只显示出一个空白的版面,这倒代是怎么回事?
请高手帮忙!!!!
窗口上有二个按纽和一人pagecontrol
button1,button2,pagecontrol1
在pagecontrol1中设计两个页面,一个为tablesheet1,另一个是tablesheet2,在tablesheet1上放一些控件,在tablesheet2上放一些控件,设置两个tablesheet的tablevisible为false
当点窗口上的button1的时候出现tablesheet1,并且上面的控件都有,点button2时出现tablesheet2,上面的控件要也有!我在
form.create上写
PageControl1.Pages[0].Show;
在启动是是可以显示出来的,而在button上写却只显示出一个空白的版面,这倒代是怎么回事?
请高手帮忙!!!!
解决方案 »
- 求翻译C++代码为Delphi(保存文件100分)
- 有高人么,如何在一个目录下循环新建文件夹?
- 如何判断多少EDIT?
- 求教 救助 求助! ASP页面与DELPHI WIN32交互
- 这是怎么回事
- 帮帮忙,关于日期转换的问题
- 谁有比较cool的编辑界面的第三方控件,发个给我,给分100。[email protected]
- 请网管别删!今年高程有人泄密不公平呀!谁能告诉我为什么会这样!
- 有没有将QuickReport报表导出到Excel的控件?
- 怎么通过计算机名得到其所在的工作组!!(是好答案,我一定马上给分)
- 哪有BusinessSkinForm控件组下载!
- 如何在PageControl中的随意位置动态生成TabSheet?
procedure TForm1.Button1Click(Sender: TObject);
begin
PageControl1.Pages[0].Show;
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
PageControl1.Pages[1].Show;
end;
to:死树,你很正常吗?
那我是怎么回事!!
晕死!
电脑开始不喜欢我了…………
5555555555555555555555555
其实应该用activepage才对
结帐