Path: utzoo!utgpu!news-server.csri.toronto.edu!rpi!zaphod.mps.ohio-state.edu!wuarchive!emory!gatech!purdue!haven!cs.wvu.wvnet.edu!cerc.wvu.wvnet.edu!blackwater!vrm
From: vrm@blackwater.cerc.wvu.wvnet.edu (Vasile R. Montan)
Newsgroups: comp.sys.mac.programmer
Subject: Complex sound manager question (for experts only!)
Message-ID: <1584@babcock.cerc.wvu.wvnet.edu>
Date: 12 Apr 91 14:06:27 GMT
Sender: news@cerc.wvu.wvnet.edu
Reply-To: un020070@vaxa.wvnet.edu
Lines: 22

I am attempting to figure out how the Sound Manager works, and
want to start by simply playing a single asynchronous sound.
I have a resource file containing the Harpsichord sound from
HyperCard, and the following code:

program SndTest;
  uses
    Sound;
  var
    Harpsichord: Handle;
    result : OSErr;
begin
  Harpsichord := GetResource('snd ', 190);  {Load in the sound}
  Result := SndPlay(nil, Harpsichord, FALSE);  {Play it}
  DisposHandle(Harpsichord);  {Do not litter}
end.

Result ends up being 0, indicating that nothing went wrong, but there
is no sound to be heard.  What's wrong?

--Kurisuto
un020070@vaxa.wvnet.edu