[Lazarus] How to produce a tone at Tone frequency for duration MSecs (milliseconds)

[Peter E Williams]

Hi All,

I am looking for a simple sound beeping component which will produce a
tone through the default sound system e.g. a Tone at frequency (in
Hertz) for duration MSecs (milliseconds).

It will replace the TbtBeeper (Delphi 5) component which mainly consists
of the following procedure:

procedure TbtBeeper.BeepFor(Tone: Word; MSecs: DWORD);	

e.g. BeepFor( 100, 500 );
// beep at 100 Hertz for half a second.

Best Regards,
	PEW
Hobart, Tasmania, Australia

-- 
Proudly developing Quality Cross Platform Open Source Games
Since 1970 with a Commodore PET 4016 with 16 KRAM
http://pews-freeware-games.org (<--- brand new)