NoSound PC Speaker sound routines

Unit

acUtils

Declaration

procedure NoSound;

Description

The NoSound procedure turns off the computer's internal speaker.

Example

The following program fragment emits a 440-hertz tone for half a second:

uses acUtils;

begin

Sound(440);        { Beep }

Delay(500);        { For 500 ms }

NoSound;           { Relief! }

end.

See also

Sound and Delay procedures.