为什么提示越界？

[duanhai]

statusbar1.Panels[0].text:='Listening...'
我在程序用了上面一句，编译时提示：'list index out of bounds (0)'
请问这是为何呀？

[movingboy]

你确信已经为该statusbar加上了一个panel吗？

[netlib]

你的statusbar1.Panels的长度是0，所以出去了。
statusbar1.Panels.add;
statusbar1.Panels[0].text:='Listening...'
这样就可以了。

[ahzhangcg]

statusbar1.SimpleText := 'Listening...';

[duanhai]

问题已解决。谢谢了