如何禁用Ribbon KeyTips?

时间:2014-05-27 11:35:38

标签: delphi devexpress ribbon delphi-xe6

详情/场景:

我正在使用Delphi XE6和DevExpress 13.1.4组件,我有一个dxRibbon组件。

我的意思是关键提示是F,Y1,Y2,Y3 ...... 1,2,3 ...当我按下键盘上的alt时会显示,如下所示: ribbon keytips

问题:

我想禁用我的功能区的键盘提示(当我在键盘上按alt时显示的那个),我尝试了很多方法,但我无法禁用它,它怎么能可以吗?

限制:

我无法修改dxRibbon.pas的源代码或重建DevExpress组件。

2 个答案:

答案 0 :(得分:2)

您已说明以下要求:

  1. 您的程序必须使用DevExpress功能区。
  2. 您的程序不得修改DevExpress功能区。
  3. DevExpress support thread表示无法禁用键盘快捷键提示。

    我们可以从中得出结论,无法实现目标。

答案 1 :(得分:0)

第1步。 使用Andy的VCL VCLFixPack。

步骤2.创建一个新单位:

unit DxBarNix; 
interface 
implementation uses VclFixPack,   dxBar;   

var   

NixKeyHook: TXRedirCode;

procedure NixKeyTip(   AShowKeyTipWindows: Boolean); 
begin   
end;

procedure StartDxRibbonHook; 
begin   
    HookProc(@dxBar.TdxBarNavigationController.EndKeyTipsWaiting, @NixKeyTip, NixKeyHook); 
end;

procedure StopDxRibbonHook; 
begin   
     UnhookProc(@dxBar.TdxBarNavigationController.EndKeyTipsWaiting, NixKeyHook); 
end;


initialization
StartDxRibbonHook;

finalization

StopDxRibbonHook;
end.

此后,KeyTips将消失。