[Delphi] Zamiana na minuty

Jak robic zeby przekształcic to na minuty ?

var
I:Integer=62;

procedure TForm1.Timer1Timer(Sender: TObject);
begin
Label1.Caption := Inttostr(I);
Dec(i);
end;

end.

chce zeby sie wyswietlalo 1:02, 1:01, 1:00, 59, 58...
Dziekuję i pozdrawiam wszystkich

var
s: string;
begin
if i >= 60 then s:=IntToStr(i div 60) + ':' else s:='';
s:=s + IntToStr(i mod 6o)
end;

Dzieki. Pozdrawiam serdecznie