 Autor
|
Tema: como recibir un tono desde la placa de sonido (Leído 5,651 veces)
|
superchorch
 Desconectado
Mensajes: 12
|
hola ante todo me presento, siempre leia y sacaba la info que necesitaba de este foro pero no encontre algo parecido a mi pregunta haci que por primera vez posteo.
No se como recibir un tono desde la placa de sonido o como direccionarla.
Para emitir no hay problema beep hace todo por mi pero como recibo un tono?
Y aunque suene trillado, gracias de antemano.
No pido que me lo resuelban sino que me orienten o den algun link para poder resolverlo yo
|
|
|
|
|
En línea
|
|
|
|
BlackZeroX
Wiki
Desconectado
Mensajes: 3.158
I'Love...!¡.
|
API Beep. Private Declare Function Beep Lib "kernel32" (ByVal dwFreq As Long, ByVal dwDuration As Long) As Long Private Sub Form_Activate() 'KPD-Team 1999 'URL: http://www.allapi.net/ 'E-Mail: KPDTeam@Allapi.net Dim Cnt As Long For Cnt = 0 To 5000 Step 10 'play a tone of 'Cnt' hertz, for 50 milliseconds Beep Cnt, 50 Me.Caption = Cnt DoEvents Next Cnt End Sub
Dulces Lunas!¡.
|
|
|
|
|
En línea
|
The Dark Shadow is my passion.
|
|
|
|
|
|
seba123neo
|
a proposito de las boludeces que se pueden hacer con el Beep, me acuerdo en pascal un codigo que tocaba con beeps el himno a la alegria de beethoven, lo perdi y nunca mas pude encontrarlo.  |
|
|
|
|
En línea
|
|
|
|
superchorch
Desconectado
Mensajes: 12
|
gracias voy a probar lo que pasaron.
Les cuento para que lo estoy buscando; seguramente se habran dado cuenta que las nuevas mothers no traen los viejos puertos serie paralelo o incluso el conector ps2 del mouse, todo es usb. Estoy desarrollando un hard para usar los tonos que siempre van a estar en las compus viejas o nuevas y me falta la integracion con la compu.
Vamos a ver que sale.
Desde ya gracias y posteo como sigo.
|
|
|
|
|
En línea
|
|
|
|
superchorch
Desconectado
Mensajes: 12
|
es una tonteria pero no funciona.
como hago para que funcione el comando BEEP???
incluyo la definicion
Private Declare Function Beep Lib "kernel32" (ByVal dwFreq As Long, ByVal dwDuration As Long) As Long
y dentro del codigo de un boton meto el comando
beep 5000, 5000
o algo parecido solo para probar pero no suena... compila y todo, puedo ejecutar sentencias despues de pasar por la instruccion beep pero no suena.
El control de sonido de windows esta habilitado y tiene un volumen normal, asi mismo pasa con el controlador mejorado de realtec; realmente estoy haciendo algo mal pero no se que es.
Aun no se me dio por buscar si en relidad tengo el kernel32 pero para mi es ovio que si lo tengo pero no hace sonido alguno
alguna idea?
|
|
|
|
|
En línea
|
|
|
|
superchorch
Desconectado
Mensajes: 12
|
no les conte
Tengo un vb6 portable corriendo en xp, pense que no me funcionaba al princio porque era portable y no le di importancia solo era cuestion de instalar uno y listo pero desde el visualstudio2008 tampoco anda.
¿que sera?
|
|
|
|
|
En línea
|
|
|
|
raul338
Desconectado
Mensajes: 2.633
La sonrisa es la mejor forma de afrontar las cosas
|
Tienes el parlantito en la CPU ?
|
|
|
|
|
En línea
|
|
|
|
BlackZeroX
Wiki
Desconectado
Mensajes: 3.158
I'Love...!¡.
|
Private Declare Function Beep Lib "kernel32" (ByVal dwFreq As Long, ByVal dwDuration As Long) As Long Private Sub Form_Load() Beep 5000, 5000 End Sub
Si no te funciona eso entonces vas a abrir tu PC y a ver si esta la pequeña bocina, ya que es Obligatoria su existencia. Dulces Lunas!¡.
|
|
|
|
|
En línea
|
The Dark Shadow is my passion.
|
|
|
|
seba123neo
|
para los que no sabian, el Beep esta en el administrador de dispositivos como un dispositivo oculto, si no esta activado no se escucha, es como si fuera un servicio, lo podes activar o desactivar.
|
|
|
|
|
En línea
|
|
|
|
|
 |
