Konstantenausdruck erwartet obwohl nicht erforderlich

[meccs]

Hallo
Ich hab ein Kleines Problem ich wollte mir das Soundabspielen vereinfachen und hab den Abspielteil des Mediaplayers in eine Prozedure gepackt

Delphi-Quellcode:

Procedure TForm1.Playsound(x:String);

  Begin
    With MediaPlayer1 do
           begin
           filename:=x;
           Open;
           Play;
            end;
            end;

Jetzt wollte ich mit dem Aufruf
playsound('1.wav'); die Sounddatei übergeben und abspielen.
Leider kommt dann immer die Fehlermeldung:
Kostantenausdruck erwartet

nu weiß ich leider nicht weiter. So wie ich das sehe müsste ja alles richtig sein...

so long
meccs

[edit=Daniel B]Delphi-Tags korrigiert. Mfg, Daniel B[/edit]