Guten Abend,
Ich habe vor kurzen mit Delphi.net angefangen und wollte jetzt in ein kleines Spiel das ich programmiere, einen einen Sekunden Timer einbauen.
Ich wollte in einem Intervall von 1000 ms, die Zahl in einem Label in jeder Sekunde +1 nehmen.
Leider wird das Tick Ereignis nur 1mal ausgeführt
.
Delphi-Quellcode:
unit WinForm;
interface
uses
System.Drawing, System.Collections, System.ComponentModel,
System.Windows.Forms, System.Data, sysutils;
procedure TWinForm.Timer1_Tick(sender: System.
Object; e: System.EventArgs);
var zahl:integer;
begin
label1.Text:=inttostr(zahl+1);
end;
procedure TWinForm.Button1_Click(sender: System.
Object; e: System.EventArgs);
begin
timer1.enabled:=true;
end;
end.
Ist sicher ein dummer Fehler aber helft mir trotzdem bitte.
mfG blade236