Stell den Timer im
OI auf Disabled (d.h. Enabled auf false
), füge noch eine globale Variable "limit" ein, mach einen Doppelklick auf den Button und schreibe das hier in den Quelltext:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
limit := 10;
wie_oft_schon := 0;
Timer1.Enabled := true;
end;