Zeit Zähler Min und Sek

[vincent]

Ich habe so angefangen, aber das programm läuft über Ttimer
anstatt Button:

procedure TForm1.Button1Click(Sender: TObject);
begin
close;
end;

procedure TForm1.StartClick(Sender: TObject);
var
mn, ss : integer;
begin

panel1.caption := TimeToStr(Time)
end;

procedure TForm1.Timer1Timer(Sender: TObject);
begin
panel1.caption := TimeToStr(Time)
end;

end.

Wie gesagt, ich brauche nur Minuten und Sekunden, bei Button anklicken das programme zählt die Sekunden zurück bis 0 Minuten : 0 Sekunden
Start : 15 Minuten : 00 Sekunden