asked on

AVI Using API Function Calls

Can anyone tell me how to display an AVI video in a VB 5 program using API functions, also
l want the video to run full screen “No surrounding borders or MAX\MIN buttons” and to
then shut automatically.

regards Kevin

caraf_g

1 Change the form's border style to 0 - none
2 Change the form's window state to 2 - maximized
3 Stick an OLE on your form
4 Point it to the correct AVI file
5 Paste the following code:

Option Explicit

Private Sub Form_Load()

Me.OLE1.Action = 7

End Sub

Private Sub OLE1_Updated(Code As Integer)

End

End Sub

608

ASKER

Thanks for you input, but l really want to achieve this using API

regards Kevin.

caraf_g

why?

608

ASKER

l have an Safety Induction Program l have written at my
workplace, it contains video and audio files, it takes
new employees through a series of topics before they are
introduced to the work environment, the audio files are played using API functions.

So l wanted to know if it was possible to achieve the same
for Video.

regards Kevin.

caraf_g

I see. It probably is, but alas I'm not an API expert. I hope someone else will be able to help you out...

Good luck!

ASKER CERTIFIED SOLUTION

sharmon

membership

This solution is only available to members.

To access this solution, you must be a member of Experts Exchange.

Start Free Trial

Moondancer

This question was awarded, but never cleared due to the JSP-500 errors of that time. It was "stuck" against userID -1 versus the intended expert whom you awarded. This corrects the problem and the expert will now receive these points; points verified.

Please click on your Member Profile and select "View Question History" to navigate through any open or locked questions you may have to update and finalize them.

This is the Community Support link, if help is needed, along with the link to All Topics since many new ones were recently added.

https://www.experts-exchange.com/jsp/qList.jsp?ta=commspt
https://www.experts-exchange.com/jsp/zonesAll.jsp

Thanks,
Moondancer
Moderator @ Experts Exchange