Der def. Windows-PC-Speaker-Piepton Strg + G auf der Console ist:
windows.beep(800, 200);
Zitat von
msdn.microsoft.com:
MessageBeep
The MessageBeep function plays a waveform sound. The waveform sound for each sound type is identified by an entry in the registry.
BOOL MessageBeep(UINT uType);
Parameters
uType
[in] Sound type, as identified by an entry in the registry. This parameter can be one of the following values.
Value Meaning
-1
Simple beep. If the sound card is not available, the sound is generated using the speaker.
Note that this value is resolved to 0xFFFFFFFF within the function.
-1 hat bei mir noch nie nicht mit Delphi funktioniert.
Windows.MessageBeep(uType: Cardinal):LongBol;