Foro de elhacker.net

Programación => Programación Visual Basic => Mensaje iniciado por: Zeroql en 20 Abril 2008, 16:47 pm

Título: Problema con los archivos resources
Publicado por: Zeroql en 20 Abril 2008, 16:47 pm

buenas a todos.
tengo un problema con el archivo derecursos al llamar a uno personalizado, les explico mejor

tengo un sonido guardado dentro de un archivo de rescusrsos normalmente para llamarlo se usa la expresion loadresdata(id,tipo), y asi lo hago:

Código

 Dim Sonido As Byte
 Sonido = LoadResData(101, "CUSTOM")
etc.
etc.

pero no me da.
alguien tiene alguna idea?

Título: Re: Problema con los archivos resources
Publicado por: seba123neo en 20 Abril 2008, 18:31 pm

Hola,tenes que hacer asi:

Código:

Private Declare Function sndPlaySound Lib "winmm" Alias "sndPlaySoundA" (lpszSoundName As Any, ByVal uFlags As Long) As Long
Private Const SND_SYNC = &H0
Private Const SND_NODEFAULT = &H2
Private Const SND_MEMORY = &H4
Dim Sonido1() As Byte

Private Sub Command1_Click()
Call sndPlaySound(Sonido1(0), SND_SYNC Or SND_MEMORY)
End Sub

Private Sub Form_Load()
Sonido1 = LoadResData(101, "CUSTOM")
End Sub

saludos.

Título: Re: Problema con los archivos resources
Publicado por: Zeroql en 20 Abril 2008, 18:42 pm

asi lo tengo yo llamo la api para ejecutar el sonido.
pero el error esta cuando a la variable sonido le llevo el archivo que esta en los resources. no me da.

Título: Re: Problema con los archivos resources
Publicado por: seba123neo en 20 Abril 2008, 18:44 pm

fijate que vos declaras a la variable como byte y es una matriz de bytes...

Título: Re: Problema con los archivos resources
Publicado por: Zeroql en 20 Abril 2008, 18:54 pm

ahora si lo arregle muchas gracias seba123neo, ya me has ayudado como 3 veces, gracias.

Título: Re: Problema con los archivos resources
Publicado por: SKL (orignal) en 20 Abril 2008, 22:41 pm

por las dudas aca te dejo un programita que hice con cobein hace algun tiempo, que reproduce sonidos asincronicos desde un recurso... aparte tiene un hook para que cuando aprete x boton salga ese sonido en especial...

Tecladito OLIVETI.rar - Descargalo en UpSourceCode.com.ar (http://www.uploadsourcecode.com.ar/d/Hz7oR3Q9yHlfu7Q91ab1vUbbbYeFq6EI)