SOM NAO MODAL

MARCELO.VB.PIRA 11/09/2006 09:57:14
#170607
Olá amigos:

Estou querendo executar um som wave em determinada parte de meu sistema (quando existem mensagens ou tarefas agendadas para o usuario, etc).

Garimpei aqui no site e achei um exemplo interessante, só que enquanto o som (.Wav) está sendo executado, o sistema "Pára" até que o som seja executado por completo, como se a função fosse "modal".

Gostaria de saber se tem como executar um som wave em segundo plano liberando o sistema para o usuário. Pois enquanto o usuário não tomar alguma atitude em relação ao aviso, ele fica se repetindo visualmente (isso já acontece sem problema do sistema ficar parando "aos saltos") e quero que fique sendo executado um som wave para chamar a atenção do usuário.

estou usando da seguinte forma:

em um módulo eu coloquei:

Public Declare Function sndPlaySound Lib "winmm.dll" _
Alias "sndPlaySoundA" (ByVal lpszSoundName As _
String, ByVal uFlags As Long) As Long

Public Enum SndPlayFlags
SND_SYNC = &H0
SND_ASYNC = &H1
SND_NODEFAULT = &H2
SND_MEMORY = &H4
SND_LOOP = &H8
SND_NOSTOP = &H10
End Enum

[c]Public Sub PlaySound(File As String, Optional Flags _
As SndPlayFlags)
If File = "" Then
Call sndPlaySound(0&, 0)
Else
Call sndPlaySound(File, Flags)
End If
End Sub



e para tocar o som, chamo assim:

PlaySound "C:\arquivos de programas\down_ups\sistema\alerta.WAV"


Obrigado.

[/c]
MARCELO.VB.PIRA 11/09/2006 19:12:04
#170733
BELEZA!!!!

deu certinho!!!!!!!

Obrigado Fessor...
Tópico encerrado , respostas não são mais permitidas
Voltar