MsgBoxSound Udf

[ResNullius]

After helping out on this thread http://www.autoitscript.com/forum/index.ph...=50966&st=0

I decided to make a few changes and now you can call any of the standard message boxes that AutoIt can create and assign your choice of wav sounds to be played. If you omit the parameter $sSound then the deafult sound is used. To have a silent MsgBox, then pass $sSound as "".

MsgBox(32, "Hey...", "What's that?")
_MsgBoxSound(32 + 4, "", "Aren't you going to answer the phone", 0,@WindowsDir & "\MEDIA\ringout.wav")
_MsgBoxSound(32, "Well...", "Who was it?",0, "") ; no sound
MsgBox(32,"Huh...","What do you meany you can't hear me?")

Func _MsgBoxSound($iFlag, $sTitle, $sText, $nTime = 0, $sSound = "default")
  Local $aEventSounds[3][5] = [[0, 16, 32, 48, 64], [".DEFAULT", "SystemHand", "SystemQuestion", "SystemExclamation", "SystemAsterisk"], ["", "", "", ""]]
  If StringLower($sSound) = "default" Or Not FileExists($sSound) AND $sSound <> "" Then
    Return MsgBox($iFlag, $sTitle, $sText, $nTime)
  Else
    For $iFlagIndex = 64 To 0 Step - 16
      If BitAND($iFlag, $iFlagIndex) = $iFlagIndex Then
        Local $iEventIndex = $iFlagIndex / 16
        $aEventSounds[2][$iEventIndex] = RegRead("HKEY_CURRENT_USER\AppEvents\Schemes\Apps\.Default\" & $aEventSounds[1][$iEventIndex] & "\.Current", "")
        RegWrite("HKEY_CURRENT_USER\AppEvents\Schemes\Apps\.Default\" & $aEventSounds[1][$iEventIndex] & "\.Current", "", "REG_EXPAND_SZ", $sSound)
        Local $nMsgBox = MsgBox($iFlag, $sTitle, $sText, $nTime)
        RegWrite("HKEY_CURRENT_USER\AppEvents\Schemes\Apps\.Default\" & $aEventSounds[1][$iEventIndex] & "\.Current", "", "REG_EXPAND_SZ", $aEventSounds[2][$iEventIndex])
        Return $nMsgBox
      EndIf
    Next
  EndIf
EndFunc   ;==>_MsgBoxSound

edit: thanks also (as usual) to SmOke_N whose code in the earlier mentioned thread formed the basis of the udf's core

Edited August 11, 2007 by ResNullius

[Generator]

Nice! Very useful.

[RazerM]

Nice function, although whilst the second msgbox is open, and another msgbox from a different app opens up with same flags, it will also have phone sound.

[ResNullius]

Nice function, although whilst the second msgbox is open, and another msgbox from a different app opens up with same flags, it will also have phone sound.

True, but I'm not smart enough to do whatever custom dll calls you'd need to make to do it any other way, if it's possible.

Of course you can always program you own GUI msgbox and play a sound on its appearance, but I just thought this would be simple for some folk to use...

[Skizmata]

Very good work, useful and allot can be learned from it.

Thanks!

[mrbond007]

@ResNullius

Nice you can also create a customized gui and use SoundPlay with it, instead of creating a MsgBox and modifiying the registry

[ResNullius]

@ResNullius

Nice you can also create a customized gui and use SoundPlay with it, instead of creating a MsgBox and modifiying the registry

I know, see my last post 2 posts back:

Of course you can always program you own GUI msgbox and play a sound on its appearance, but I just thought this would be simple for some folk to use...

[jennico]

very cheeky what you're doing !

very nice. thanks a lot.

another way to manipulate sounds would be to temporarily rename the files themselves. but i have no idea which method would be faster or more secure.

j.