Здравствуйте, помогите пожалуйсто с программой Delphi!

Я вот собирался делать таймер обратного отсчета.
Нашел код //

procedure TForm1.Timer1Timer(Sender: TObject);
var H, M, S : Byte;
begin
Dec(EndTime);
if EndTime <= 0 then Halt;

S := EndTime mod 10;
M := EndTime div 10 mod 10;
H := EndTime div 10;
Label7.Caption := IntToStr(H) + ':' + IntToStr(M) + ':' + IntToStr(S);
end;

Но когда я его вставил у меня (EndTime) светится красным цветом!
Что делать подскажите пожалуйста!

Кто разбирается в программе Delphi 7

Добавьте в скайп - dima_1254