菜单项如何显示Hint??

Question

菜单项的属性中有Hint，但没有showhint，我看了帮助，说把form和Application的ShowHint都设成true就可以了，但试了不行，不知哪位大侠知道解决办法！！

Answer 1

The hint text appears in a Help Hint window when the user pauses with the mouse over the menu item if Help Hints are enabled (that is, if the Form抯 and the Application抯 ShowHint properties are true).帮助里说把FORM和APPLICATION的SHOWHINT设置为TRUE就可以了，，，可是，，呵呵，我也闹不出来，顶

Answer 2

delphi自身的菜单也没有提示 
怀疑是不是bug？^_^
菜单提示显示不出来， 但是其他的控件提示完全可以显示

Answer 3

改造Hint输出方式 
 
6/25/2000 0:0:0· ·-··中国计算机报 
　elphi为每个可视构件(而非快速按钮专属)都提供了Hint及ShowHint特性，其中Hint属性指定文本提示盒中的文本，而ShowHint属性则决定鼠标指向构件时是否显示文本提示盒，当ShowHint值为True时，显示文本提示盒。用户可在对象监视器(Object Inspector)的属性栏中设置或在程序中修改Hint及ShowHint属性。　　除此之外，Delphi还在类TApplication中提供了HintColor、HintPause、HintHidePause、HintShortPause几个属性来控制文本提示盒的输出方式。　　一般来说，HintColor、HintPause、HintHidePause、HintShortPause通常在Form的OnCreate事件中设定它们的值(如有需要的话)，如以下的一段程序。　　ProcedureTMainForm.FormCreate(Sender:TObject);
　　begin
　　Application.HintPause:=0;｛使文本提示盒立即出现｝
　　Application.HintPause:=clBlue;｛以蓝色小方框的方式出现｝
　　Application.HintHidePause:=10000;｛延长停留时间为10秒｝
　　Application.HintShortPause:=100;
　　end;　　另外，在编程中，我们还可以通过TApplication的OnHint事件获取鼠标指向构件的Hint文本。　　事实上，Delphi提供的文本提示盒输出方框、文本字型都太小，既不美观亦不易看清。值得庆幸的是，Delphi2.0版提供了全部构件的源代码，我们可以通过对类TApplication的源码作一些小修改，增加一个HintFont的属性，即可象修改HintColor一样来修改文本提示盒的字体、
字型大小等。　　TApplication是在Forms单元里定义的，因此让我们打开Forms.pas单元文件来作以下一些修改:　　ProcedureSetHintColor(Value:TColor｝;
　　ProcedureSetHintFont(Value:TFont);｛1997.04.19 MyNewIdea｝
　　Property HintColor:TColor read FHintColor Write SetHintColor;
　　Property HintFont:TFontwriteSetHintFont;｛1997.04.19Mynewidea｝
　　ProcedureTApplication.SetHintColor(Value:Color); //增加一个过程｛1997.04.19Mynewidea｝　　ProcedureTApplication.SetHintFont(Value:TFont); 
　　begin
　　if(Value nil) and (FHinWindow nil) then
　　FHintWindow.Canvas.Font:=Value;
　　end;｛1997.04.19Mynewidea｝　　别忘了在新增的语句旁作一些必要的注释，如上 模?997.04.19Mynewidea｝，可以很清楚地知道哪些语句是你自己加进去的。　　将修改后的Forms.pas存盘，然后重建库文件，以后在你的库文件里，类TApplication就多了一个属性HintFont，你就可以很轻易的通过HintFont属性来修改文本提示盒的字体、字型大小了，如以下一段程序:　　ProcedureTMainForm.FormCreate(Sender:TObject);
　　Var
　　NewHintFont : TFont;
　　begin
　　NewHintFont:=TFont.Create;
　　NewHintFont.Name:=楷体－GB2312;｛设置字体为楷体｝
　　NewHintFont.Size:=12;｛设置字型大小为12｝
　　Application.HintFont:=NewHintFont;
　　end;　　此外，Delphi绘制文本提示盒是在类THintWindow的方法ActivateHint中通过WindowsAPI资源函数SetWindowPos来实现的，这段代码在Controls.pas单元文件里，有兴趣的读者可以进一步修改这段代码以绘制其他任意形状(如椭圆、圆等)而不仅仅是矩型方框的文本提示盒！但或许最好的方法是从类THintWindow继承下来一个新类，并重载Activate？Hint方法，然后在应用程序开始处给变量HintWindowClass指派一个新类实例。