Здравствуйте,помоги пожалуйста переделать таймер.Нужен обратный отсчёт времени,но у меня не получается сделать.
Код:
begin
sec := sec + 1;
if sec = 60 then
begin
min := min + 1;
sec := 0;
end;
if sec < 10 then
Label2.Caption := '0' + IntToStr(sec)
else
Label2.Caption := IntToStr(sec);
if min < 10 then
Label1.Caption := '0'+IntToStr(min)
else
Label1.Caption := IntToStr(min);
end;