Hallo,
Ich habe folgendes Problem: Ich möchte eine Audio-File im .wav-Format von einer Ressource aus abspielen.
Der jetzige Stand:
Die Ressourcen-Datei, welche im Projekt-Verzeichnis liegt:
10 WAVE Schatz.wav (heißt binres.res)
(binres.rc wurde mit brc32.exe -r binres.rc compiliert)
Die Unit:
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
begin
playsound('10',hinstance, snd_resource);
end;
(uses: mmsystem, sonst nichts eingefügt)
--------------------------------------------
Projekt-Code:
uses
Forms,
Unit1 in 'Unit1.pas' {Form1};
{$R binres.res}
begin
Application.Initialize;
Application.CreateForm(TForm1, Form1);
Application.Run;
end.
Warum ertönt beim Drücken des Knopfes kein Sound ?
Danke im Voraus für die Hilfe!
isocam Gast |
