[RESOLVED] How to addressing wav and gif from resources?

[pourkascheff]

Hi, these two lines of codes already tested and works properly. What if you include those *.wav(s) and *.gif(s) in app resources? How can we address them using My.Recourses?

Dim animatedImage As New Bitmap(Application.StartupPath & "\splash.gif")

My.Computer.Audio.Play("select.wav")

Need to achieve something independent and app-included like this: (Following codes are examples and errors surly pop up)

Dim animatedImage As New Bitmap(My.Resources.splash)

My.Computer.Audio.Play(My.Resources.select)

[jmcilhinney]

Firstly, if errors pop up and you want us to help you fix them, don't you think it would be a good idea to provide us with the error messages? That's just common sense.

When you add an existing file to your Resources, the type of property generated in My.Resources will depend on the type of file you added. You can see the type of each property just like you can any other in code. If you do this:

Dim x = My.Resources.splash

then you'll be able to see what type that property is as you type or by checking the type inferred for x. For a GIF file, I'd expect the property to be type Image and the object it returns to be type Bitmap.

For the WAV, I would expect the property to be either Byte() or perhaps UnmanagedMemoryStream or the like. In either case, you should be able to pass it directly to Play as long as you provide a second argument of type AudioPlayMode. I suspect that the error message actually told you that, but I can only guess.

[pourkascheff]

I might be a bit less artful in describing things, sorry for that

I achieve correct results for first part of the thread. You can call a wave file anywhere in your WinForms VB.NET projects from My.Resources via

My.Computer.Audio.Play(My.Resources.ButtonClick, AudioPlayMode.Background)

Second part which was GIF files, Difficult part is, Application runs and do things with no errors (To mention) Only additional information is

Instead of

Dim animatedImage As New Bitmap(Application.StartupPath & "\splash.gif")

I used

Dim animatedImage As New Bitmap(My.Resources.splash, My.Resources.splash.Size)

The goal is to "play" GIF file once in a picturebox then proceed. Problem is only the first frame of GIF will be shown. Should I vast the gif array as its length, if so HOW?

[jmcilhinney]

I used

Dim animatedImage As New Bitmap(My.Resources.splash, My.Resources.splash.Size)

The goal is to "play" GIF file once in a picturebox then proceed. Problem is only the first frame of GIF will be shown. Should I vast the gif array as its length, if so HOW?

I thought we already covered this:

Dim animatedImage = My.Resources.splash