请帮助检查一段源程序，显示时间为何不湿递减？(50分)

在定时器空间中编写如下代码，应显示为时间的递减，但不知为何时间以减2的形式递减，源码如下：
tt:=120
procedure Twllks.Timer1Timer(Sender: TObject);
begin
tt:=tt-1;
statusBar1.Panels.Items[2].Text:='剩余时间：'+inttostr(tt)+' 分钟';
end;
请帮助检查，问题出在哪里。

1：聲明tt為全局變量，使用你的代碼在Delphi環境下測試沒有問題
所以肯定在其它地方你有賦tt:=tt-1或dec(tt);之類的命令

接受答案了.