Labyrinth Spiel-Ist das Möglich?

[Patrick6]

So...ein letztes mal:

Ich hab es jetzt so:

Delphi-Quellcode:

procedure TForm1.BitBtn3Click(Sender: TObject);
begin
   if Level4 = true then
    Image1.Picture.Bitmap.LoadFromFile('C:\Dokumente und Einstellungen\Jäger\Desktop\Delphi7\_RealProject\Level5.bmp');
    BitBtn3.Enabled := false;
   if Level1 = true then
    Image1.Picture.Bitmap.LoadFromFile('C:\Dokumente und Einstellungen\Jäger\Desktop\Delphi7\_RealProject\Level4.bmp');
    BitBtn3.Enabled := false;
    Level1 := false;
    Level4 := true;
end;

Levelx eben als Variable deklariert. Jetzt kann ich aber nicht noch Level5 z.B. dazu machen, mit dieser Technik. Ich habe keine andere Ideen mehr...