Path: utzoo!utgpu!news-server.csri.toronto.edu!cs.utexas.edu!sun-barr!olivea!samsung!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: Simple sound manager question
Message-ID: <1570@babcock.cerc.wvu.wvnet.edu>
Date: 10 Apr 91 16:21:31 GMT
Sender: news@cerc.wvu.wvnet.edu
Reply-To: un020070@vaxa.wvnet.edu
Lines: 21

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);
  Result := SndPlay(nil, Harpsichord, FALSE);
end.

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

--Kurisuto
un020070@vaxa.wvnet.edu