Interner Lautsprecher

[delphi-anfänger]

Hallo erstmal!
Ihr kennt doch alle ddie internen lautsprecher eines pc´s, die nur 'piepen'.
ich lasse ihn jetzt mal zum beispiel mit

Code:

windows.beep(4000,2000);

für 2 sekunden mit der frequenz 400hz piepen. wie könnte ich denn das gepiepse unterbrechen?

Bis bald