还是Hint问题

ok!
首先你在各按纽的hint属性赋值！
接着，定义自己的一个显示函数；
最后在Form.creat事件中进行处理；
具体小事例如下：
………………procedure TForm1.FormCreate(Sender: TObject);
begin
      Application.OnHint:=ShowMyHint;
end;procedure TForm1.ShowMyHint(sender: TObject);//自己定义的显示函数
begin
     statusbar1.Panels[0].Text:=Application.Hint;
end;