Wie wave-Resource mit SndPlaySound abspielen?

[jaenicke]

Dann musst du irgendetwas anders gemacht haben. So sieht es bei mir aus:

Delphi-Quellcode:

procedure TForm281.ZahlSound(Zahl: Integer);
var
  ResName: String;
begin
  ResName := 'Resource_' + Zahl.ToString;
  Playsound(PChar(ResName), 0, SND_Resource or SND_Sync);
end;

procedure TForm281.Button1Click(Sender: TObject);
begin
  ZahlSound(1);
end;

Das Testprojekt, das ich dafür eben erstellt habe, liegt im Anhang.