Delphi中一个相当有意思的问题

Hank 2006-08-19 10:53:06

随便建一个窗口，窗口上放一个TPageControl控件，然后添加几个Page

然后在FormCreate中添加以下代码

BorderIcons:=BorderIcons-[biMinimize, biMaximize]+[biHelp]; //窗口系统按钮中隐藏最大最小化按钮并显示帮助按钮
PageControl1.Pages[0].TabVisible:=False; //隐藏TPageControl第一页的翻页按钮

然后就执行，很不幸，执行报措！虽然可以执行，但结果是错的，把最后一页的翻页按钮隐藏了
如果把以上2行换过来，那执行是没问题的，也达到目的了

如果说是执行次序的问题，那么在设计阶段把第一行的工作完成，结果也是正确的。
有意思吧？

以上在D5/D6中均出错！

大伙在Delphi其它版本下测试看看

...全文

1782 32 打赏收藏转发到动态举报

写回复

用AI写文章

32 条回复

切换为时间正序

请发表友善的回复…

发表回复

yjbnew 2006-08-21

打赏
举报

mark

jl820712 2006-08-21

打赏
举报

晕，没碰到过。
但如果直接在控件属性上设置。而不是在formcreate事件中写应该没错误的。

MoveFirst 2006-08-21

打赏
举报

遇到过这个问题

OO_is_just_P 2006-08-21

打赏
举报

又见臭虫

Angly1018 2006-08-21

打赏
举报

繼續學習

Angly1018 2006-08-21

打赏
举报

測試過(D7)中還有這麼回事

lxbsweet 2006-08-21

打赏
举报

高手的问题就是不一样啊，记下了

superyys 2006-08-21

打赏
举报

delphi的bug一大把,有时候真的是忍无可忍!

yz_34212248 2006-08-21

打赏
举报

是啊。我在Delphi7下也不能隐藏Page..

hnldsfww 2006-08-21

打赏
举报

强悍

constantine 2006-08-21

打赏
举报

知道了

Rubi 2006-08-21

打赏
举报

en,民间测试团队啊

Dlwxn 2006-08-21

打赏
举报

d6+update3同样有BUG

天涯倦客 2006-08-20

打赏
举报

还好，D2006改过来了

王集鹄 2006-08-20

打赏
举报

BorderIcons := BorderIcons - [biMinimize, biMaximize, biHelp]; //窗口系统按钮中隐藏最大最小化按钮并显示帮助按钮
PageControl1.HandleNeeded; //<<<<<加这话后没出现异常
PageControl1.Pages[0].TabVisible := False; //隐藏TPageControl第一页的翻页按钮

zahahui 2006-08-20