怎么屏蔽 pagecontrol 控件的 ctrl+ tab 组合建,不想让
用户在pagecontrol 间自由切换,

解决方案 »

  1.   

    重写下面TPageControl的下面这个函数,什么事也不干就行了:)procedure TPageControl.CMDialogKey(var Message: TCMDialogKey);
      

  2.   

    找到了,要改动Tpagercontrol 原来的文件comctrls.pas ,我不想改动delphi 的系统文件
    ,我想在程序中继承这个控件,再改写这个方法,好哟点,怎么实现?
      

  3.   

    我把 delphi 的 comtrls.pas 的procedure TPageControl.CMDialogKey(var Message: TCMDialogKey);
    改称什么事都不作,再保存,编译,还是可以通过tab + ctrls 来切换呀? 怎么板?