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

[Henry Vermaak]

On 02/09/10 10:39, Peter E Williams wrote:
> On Wed, 01 Sep 2010 15:38:13 +0200 John vd Waeter<john at jvdw.nl>  wrote:
>
>> Lol, I wrote something like that years ago... but in these days it was
>> allowed to address the speaker hardware...
>>
>> Windows.Beep(freq,duration) does about the same, but afaik it is not
>> implemented in Lazarus.
>
> At the risk of asking a silly question. Why has no-one ported the
> Windows.Beep procedure to Lazarus. Surely it is not too hard ?!?

It's not fool proof, but it's not too hard.  See here:

http://github.com/johnath/beep/blob/master/beep.c

Henry