Visible befehl funktioniert nicht

[Fr33z0r]

hilft sicherlich auch nicht weiter:

Delphi-Quellcode:

procedure TForm1.Button4Click(Sender: TObject);
var zeit: integer;
begin
zeit:=100;
label8.Caption:=inttostr(zeit);
timer1.Enabled:=true;
Button4.Visible:=false;
end;

procedure TForm1.Timer1Timer(Sender: TObject);
var zeit: integer;
begin
zeit:=strtoint(label8.Caption) - 1;
label8.Caption:=inttostr(zeit);
end;

procedure TForm1.Button5Click(Sender: TObject);
begin
timer1.Enabled:= false;
end;