Hello,

I believe this will work:

Function IsBrailleActive()

Dim oBraille

Set oBraille = Application.BrailleDisplays.Active

If oBraille.Type > 0 Then
IsBrailleActive = True
Else
 IsBrailleActive = False
End If
Set oBraille = Nothing

End Function

A new version of the Winamp scripts with braille added in the play list is 
coming soon.  Huh, I left my display at work, so those of you that have them at 
home, give it a whurl when it appears on SC.

Jeff

Reply via email to