Autorennen Spiel (mein 2 Projekt)

[Blink]

Hi

Ich habe gerade ein Problem dabei die Pause procedure zu schreiben also mein Code schaut so aus

Delphi-Quellcode:

procedure TForm1.Pause;
var
 ft, lt, l, r, st: Boolean;
begin
  ft:= FahrtTimer.Enabled;
  lt:= LevelTimer.Enabled;
  l:= Links.Enabled;
  r:= Rechts.Enabled;
  st:= StartTimer.Enabled;

  if BolPause = False then
  begin
    BolPause:= True;
    FahrtTimer.Enabled:= False;
    LevelTimer.Enabled:= False;
    Links.Enabled:= False;
    Rechts.Enabled:= False;
    StartTimer.Enabled:= False;
  end
  else
  begin
    BolPause:= True;
    FahrtTimer.Enabled:= ft;
    LevelTimer.Enabled:= lt;
    Links.Enabled:= l;
    Rechts.Enabled:= r;
    StartTimer.Enabled:= st;
  end;
end;

Bevor ich die Timer deaktiviere Speicher ich den Status ob sie zur Zeit aktiv oder nicht aktiv sind in den variablen, aber wenn ich dann die variablen wieder zu den Timer setzten will passiert nichts dann ist zB. FahrtTimer.Enabel immer noch auf Flase. Hat das vielleicht was damit zu tuen das in der variablen anstatt True und False nur -1 und 0 gespeichert werden. Oder gibt es vielleicht irgendein befehl mit dem man das ganze Fenster Pausieren kann?

Hab den Fehler entdeckt muss die Variablen las globale deklarieren