source: Include/Classes/System/Media/SystemSounds.ab@ 100

Class SystemSounds
Public
    Override Function ToString() As String
        Return "SystemSounds"
    End Function

Public
    Static Function Asterisk() As SystemSound
        Dim ret As SystemSound(SND_ALIAS_SYSTEMASTERISK)
        Return ret
    End Function
    Static Function Beep() As SystemSound
        Dim ret As SystemSound(SND_ALIAS_SYSTEMDEFAULT)
        Return ret
    End Function
    Static Function Exclamation() As SystemSound
        Dim ret As SystemSound(SND_ALIAS_SYSTEMEXCLAMATION)
        Return ret
    End Function
    Static Function Hand() As SystemSound
        Dim ret As SystemSound(SND_ALIAS_SYSTEMHAND)
        Return ret
    End Function
    Static Function Question() As SystemSound
        Dim ret As SystemSound(SND_ALIAS_SYSTEMQUESTION)
        Return ret
    End Function
End Class