Fehler meldung Konstantenausdruck erforderlich?

[m.wollert]

Delphi-Quellcode:

begin
  Case rgArt.ItemIndex of
    0,1:  stand := 0;
    2:
            case gartx01.ItemIndex  of
                  0: stand := 201;
                  1: stand := 301;
                  2: stand := 501;
            end;
    3:    begin
            stand := 0;
            Game(15);       //hier kommt der fehler jetzt hoffentlich nicht mehr ;)
          end;
    4:    begin
            stand := 1;
            Game(1);        //und hier kommt der fehler hoffentlich auch nicht mehr
          end;
  end;

Begin/End-Block vergessen ;-)