怎样把状态栏的提示放在第三项里，而不是第一项？

Question

怎样把状态栏的提示放在第三项里，而不是第一项？
还有应该怎样在状态栏增加时间和日期，并要显示成灰色？

Answer 1

Statusbar1.Panel[2].Text:='这是提示'Statusbar1.Panel[3].Text:=DateToStr(Date)
Statusbar1.Panel[4].Text:=TimeToStr(Time)
Statusbar1.Enabled:=false   //灰色

Answer 2

没有，我想把菜单栏的菜单提示显示在状态栏里，如Statusbar1.Panel[2].Text:='提示'，而Statusbar1.Panel[2].Text:='要提示的内容'，还有，这个源代码加到那里？