Звуки в Delphi 7

procedure TForm1.Panel1MouseMove(Sender: TObject; Shift: TShiftState; X,
  Y: Integer);
begin
 Play('123.wav');
 
end;
 
procedure TForm1.Play(FileName: string);
begin
 
 MediaPlayer1.FileName:= FileName;
 MediaPlayer1.Open;
 MediaPlayer1.Play;
 
 
end;

TForm1.Panel1MouseMove

procedure TForm1.Panel1Enter(Sender: TObject);
begin
 PlaySound(PChar('123.wav'), 0, SND_FILENAME or SND_SYNC);
end;

procedure TMenuGame.ContinueMove(Sender: TObject; Shift: TShiftState; X,
  Y: Integer);
   begin
  if ContProv=True then begin
  PlaySound('Sound\Explosion5.wav',0,SND_ASYNC);
  ContProv:=False;
  NGProv:=True;
  end;
end;
 
procedure TMenuGame.NewGameMove(Sender: TObject; Shift: TShiftState; X,
  Y: Integer);
begin
    if NGProv=True then begin
    PlaySound('Sound\Explosion5.wav',0,SND_ASYNC);
    NGProv:=False;
    ContProv:=True;
    end;
end;