问一个简单的问题：如何在状态栏显示当前鼠标指定的菜单或工具按钮？

Question

一般程序都会在最下角显示被一些信息，请大家指点一下注：最好是用 Delphi 自带的功能

Answer 1

procedure TF_Main.FormCreate(Sender: TObject);
begin 
  Application.OnHint := AppHint;
end;
procedure TF_Main.AppHint(Sender: TObject);
begin
  Bar1.Panels[1].Text := Application.Hint;
end;

Answer 2

StatusBar1的属性设置为:
ShowHint=True
AutoHint=TrueMainMenu1的子菜单的属性设置为:
Hint=设置你要提示的信息

Answer 3

Hint=简短信息|较详细的信息
其中简短信息出现在黄色弹出式提示中（如果ShowHint=True), 较详细的信息出现在状态栏的Panels[0]上（如果AutoHint=True)。

Answer 4

补充一点：如果状态栏的Columns为空，则要设置状态栏的SimplePanel为True