Время простоя в статус баре в многооконном текстовом редакторе

double TotalTime;

void __fastcall TForm1::Timer1Timer(TObject *Sender)
{
TDateTime NowTime = Time();
TotalTime += 1.0 * Timer1 -> Interval ;
StatusBar1->Panels->Items[0]->Text="Время: " +NowTime;
StatusBar1->Panels->Items[1]->Text= +TotalTime/1000;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::FormMouseMove(TObject *Sender, TShiftState Shift,
      int X, int Y)
{
TotalTime = 0.0;
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::FormKeyPress(TObject *Sender, char &Key)
{
TotalTime = 0.0 ;
}

void __fastcall TForm2::FormMouseMove(TObject *Sender, TShiftState Shift,
      int X, int Y)
{
TotalTime = 0.0;
}
//---------------------------------------------------------------------------
 
void __fastcall TForm2::FormKeyPress(TObject *Sender, char &Key)
{
TotalTime = 0.0;
}

TDateTime TotalTime;  
 
__fastcall TForm1::TForm1(TComponent* Owner)
    : TForm(Owner)
{
    TotalTime = Now();  //первый раз запоминаем время при запуск программы. 
    Timer1Timer(Timer1);  //показываем время не дожидаясь первого наступления события таймера
}
 
void __fastcall TForm1::Timer1Timer(TObject *Sender)
{
    StatusBar1->Panels->Items[0]->Text = "Время: " + TimeToStr(Time());
    StatusBar1->Panels->Items[1]->Text = TimeToStr(Now() - TotalTime);
}
 
void __fastcall TForm1::FormMouseMove(TObject *Sender, TShiftState Shift,
      int X, int Y)
{
    TotalTime = Now();  //сбрасываем время
    Timer1Timer(Timer1);  //тут же отображаем изменение
}
//---------------------------------------------------------------------------
void __fastcall TForm1::FormKeyPress(TObject *Sender, char &Key)
{
    TotalTime = Now();  //сбрасываем время
    Timer1Timer(Timer1);  //тут же отображаем изменение
}

#include "Unit1.h"

extern TDateTime TotalTime;

Form1->TotalTime = Now();