Fehlermeldung: Ausdruckstyp muss BOOLEAN sein

[Fr33z0r]

Moin moin liebe Sportsfreunde!
Ich bin gerade dabei ein Spiel zu coden, bei dem der Computer zufällig 4 farbige buttons nacheinander drückt, die der user dann wiederholen muss (manche kennen das spiel unter dem namen "Simon")

Ich bin gerade dabei, dass der Computer in Level 1 vier buttons zufällig drücken soll und bekommen die fehlermeldung:
[Fehler] Unit1.pas(127): Ausdruckstyp muss BOOLEAN sein
ich finde aber einfach den fehler nicht. kann mir jemand helfen?
hier mein Text:

Delphi-Quellcode:

var
  Form1: TForm1;
  delay: Integer = 1;
  level: Integer = 0;
  start: boolean = true;

implementation

procedure TForm1.Timer1Timer(Sender: TObject);
var
   r, help: Integer;
   begin
if start = true then begin
   INC(level);
   help:=level + 3;
   start:=false;
                  end;
   if
         if delay = 1 then   begin
                                      randomize;
                                      r:=Random(4);
                                      if r=0 then panel7.Color:=clRed;
                                      if r=1 then panel4.Color:=clLime;
                                      if r=2 then panel5.Color:=clYellow;
                                      if r=3 then panel6.Color:=clBlue;
                                      delay:=2;
                                     end
                              else   begin
                                      panel4.Color:=clGreen;
                                      panel5.Color:=clOlive;
                                      panel6.Color:=clNavy;
                                      panel7.Color:=clMaroon;
                                      delay:=1;
                                      DEC(help);
                                        if help = 0 then timer1.Enabled:=false;
                                     end; // <-- hier soll laut Delphi der Fehler sein
end;