一个奇怪的问题,谁能帮我解决?

Question

整个程序运行正常,可是加入下面代码后,就提示access violation at address.....
procedure Tmainform.Timer1Timer(Sender: TObject);
begin
StatusBar1.Panels[2].Text :=datetimetostr(now);
end;
本是很简单的问题,怎么会这样呢?以前都很好的,怪事,那位大侠可以 帮我解决阿?

Answer 1

看看最前的uses 语句中有没有ExtCtrls, ComCtrls

Answer 2

StatusBar1.Panels.Items[1].Text:=datetimetostr(now);

Answer 3

ExtCtrls, ComCtrls打当然有,在程序中已经在StatusBar1中显示正常了,只是不能退出.退出的时候会跳出无数个对话框,提示access violagtion........必须强行关闭才行!奇怪啊!没有高手了吗?

Answer 4

在STATUSBAR中是否设置了PANEL？