|
Hi there
I almost have no hair left after tearing it all out to try get composite or s-video input playing on a VB6 form, using the MSVidCtl.dll. I am using the msvidctl quite happily with digital television, and am able to get a fine picture. However, it seems that composite or s-video should be even easier to play, but it is simply not working for me. I have scoured the web to try find out how to do it properly but can't get it to work.
I am starting with a simple VB6 application (has to stay in VB6 for compatibility reasons, preferably using the msvidctl.dll as it is already in use elsewhere in my program). Program also uses Quicktime and Windows Media Player activex controls, but neither of these 2 can play composite or s-video input.
You will require a TV tuner card with a composite or s-video input. You may not actually need the tuner part, so even just a USB capture device should work. I plug an external DVD player into this USB capture device, and I can view DVDs from either composite or s-video inputs using TV Tuner software (Blaze TV), so I know the connection is working.
Anyways, do this:
1. Ensure at least DirectX 9 is installed (run dxdiag from Run and check DirectX version).
2. Create a new VB6 application.
3. Add a Reference to MS Video Control 1.0 Type Library
4. Add MS Video Control 1.0 Type Library as a Component. You will see the blue TV screen with a red circle in the in components window.
5. Add a MSVidCtl object to your form, name it VidControl.
6. Add this code to the Form_Load event:
Dim objTSContainer
Dim objTuningSpace
Dim objTuneRequest
Set objTSContainer = CreateObject("BDATuner.SystemTuningSpaces")
Set objTuningSpace = objTSContainer("AuxIn1")
objTuningSpace.CountryCode = 61 'australia - not really required but may determine PAL/NTSC etc.
Set objTuneRequest = objTuningSpace.CreateTuneRequest
objTuneRequest.Channel = 0 ' 0 = s-video (4-pin connector), 1=composite video (yellow RCA connector)
VidControl.View objTuneRequest
VidControl.Run
7. Run the program.
8. I always get the error "Run time error -1073478249 (c0040597). Method Run of object IMSVidCtl failed" on the VidControl.Run line.
I have tried multiple combinations of tuning spaces like AuxInTuningSpace, trying to find different input devices (which shouldn't be necessary to manually select since I have selected "AuxIn1" tuning space.
Any advice or sample code would be welcomed.
Anthony Sacker
Software Developer, with less and less hair.
|
|
|
|
|
ant999888 wrote: has to stay in VB6 for compatibility reasons
Someone must really hate you, sorry not to be of any support in this, I'm just astounded at the amount of current development in VB6.
Compatibility with what, 486 pcs.
Never underestimate the power of human stupidity
RAH
|
|
|
|
|
Hi Mycroft
I am extending the functionality of a large system developed in VB6 years ago. A rewrite in .Net, which I'd love to do, is out of the question because of the cost of the project, so I have to keep the VB6 project going... 
|
|
|
|
|
Yeah, some people get all the crap jobs, my sympathies.
Never underestimate the power of human stupidity
RAH
|
|
|
|
|
I've never used the control, nor done anything with s-video, so I can't help much.
But, as far as i know, the MS Video Control library only work with Media Center drivers. Does your tuner have MC drivers installed??
|
|
|
|
|
Hi Dave
I am using the MS Video Control on a standard XP Pro system - no Media Center software, other than DirectX 9, is installed. The USB video input device works fine, as I can play my camcorder via the software that came with the USB tuner. I also have a PCI TV tuner card that works fine with VB6 and MS Video Control (i.e. I can play TV using the video control), but when I try access the composite or s-video input, it fails as I described in my original post.
I'm not sure if I can just install Media Center on an XP machine - I thought Media Center was OEM-installed and not available as a standalone install.
Regards
Anthony
|
|
|
|
|
In that case, I have no idea. Your treading in water that few people ever touch. Your question isn't really about VB6 or VB.NET, but the MS Video control.
|
|
|
|
|
Hello, I am searching for a lot of time how to use the MSVidCtl.dll features in VB6 and I didn't find any practical explanation in the web, even in MSDN documentation. So I enjoyed to find your topic with a begining of solution, and I tried your method to add this ressource to a VB6 form. I could successfuly add a reference to MS Video Control 1.0 Type Library, but when I tried to add MS Video Control 1.0 library as a component, I got the following message "Dependances circulaires entre modules" and I couldn't add it. So, please, if you have any explanation and solution to by-pass this problem and make the library availaible under VB6, I would be very grateful to you. My purpose is only to get the power status of my monitor from a VB application, and the only way I found for that is to use "IMSVidDevice::get_Power", which I understand to be a method from MSVidCtl. Best regards
|
|
|
|
|
I'd ask why you're replying to a thread from 14 years ago; but given you're still using a language that's been dead for twenty years, somehow I'm not surprised. 
"These people looked deep within my soul and assigned me a number based on the order in which I joined."
- Homer
|
|
|
|
|
Hello,
Thank you for your attention.
I can understand your surprise, and I've been surprised myself to get an answer after such a long time !
First, I've never been a software developer, I'm just an aerospatial engineer retired for a long time.
When retired, I begun to write applications for my personal use. It was under XP. I used first vbscript, then Excel/VBA and I discovered that it's not possible to write big real-time applications with them. So I got a VB6 license and I wrote successfuly some rather complex applications with it.
I also discovered that, even if these languages are all "VB" ones, you have each time to learn a new syntax and a new way of writing. That's the reason for what I didn't want to migrate to VB.net or other language.
Then, it was vista, win7, win10... I succeeded to reinstall VB6 under win10, and to run my programs with some minor corrections.
BUT, doing that, I lost the integrated help... So I need to use the on-line MSDN documentation (but µsoft doesn't continue to support VB6 and all the examples I can find are in VB.net or C++). Sometimes it helps me, sometimes not !
So I finally have to search in the web forums the answers to my questions.
Doing that, I discovered in the original post the existence of the MSVidCtl library and the possibility to use it in VB6. I think it can bring me a solution to my need to retrieve the power status of my monitor.
I finally succeeded to make it appear in my VB6 objects list, and when I declare : "Dim display as IMSVidDevice" i get no error.
When writing "ret = display. ", the editor proposes effectively (the wanted method) "Power". Now, for the different reasons above, I can't successfuly use the desired function.
Neither "ret = display.Power" nor "ret = display.Power (p)" works correctly, and with no help I finally will lose my last hairs (and perhaps my wife !!..)
So, if somebody could help me, it would be very very kind of him. 
|
|
|
|
|
I have a deployment project in the same solution with my main project.
I add the primary output from the main project to the deployment project.
When I build the deployment project it does not include the most current build of the main project's .exe
I cannot figure out which build of the .exe the deployment project is using.
Can anyone provide any way I can tell the deployment project which build of the main project to use?
Than you
|
|
|
|
|
Clean the project before you rebuild it.
|
|
|
|
|
Thanks, that helps.
Can I ask one more question?
What is the setting that allows the user to update the application even if it is in the same version without having to first uninstall?
Thanks
|
|
|
|
|
I believe it's a combination of the setup project's UpgradeCode property and Version property.
|
|
|
|
|
can anyone provide me with source code to connect my phone through usb port to achieve the following:to be able to receive and read them on my laptop,to send message through my laptop to the recepient.this code has to be in visual basic 6.0
|
|
|
|
|
sikadiwe wrote: can anyone provide me with source code to connect my phone through usb port to achieve the following
No. We don't supply you with source code for anything. We'll help with any specific problems you have writing your own code, but we're not going to do your work for you.
|
|
|
|
|
Try rentacoder.com
Never underestimate the power of human stupidity
RAH
|
|
|
|
|
Why on earth would anyone still use VB6 ? It's so dead that anything that was still going to be in use this far out, should have been converted to a real language, long ago.
Christian Graus
Driven to the arms of OSX by Vista.
Read my blog to find out how I've worked around bugs in Microsoft tools and frameworks.
|
|
|
|
|
I have completed a small project, and I want to learn, how to access that program by internet from different place. Iam also a one of the LAN user.
Which is the best way to do that?
Any Ideas for me?
Thanks
|
|
|
|
|
Buy a copy of GoToMyPC.
Henry Minute
Do not read medical books! You could die of a misprint. - Mark Twain
Girl: (staring) "Why do you need an icy cucumber?"
“I want to report a fraud. The government is lying to us all.”
|
|
|
|
|
I may be new to these forums, but I'm pretty sure that you will struggle to get help with that question. Even if your own intentions are honest, I'm not calling into question the legitimacy of your own project. But others that view these boards might not have the same things in mind.
|
|
|
|
|
You're going to have to precisely define what you mean by "access that program by internet". What does the app do?? Where do you want the code to run?? Do you want it to run on the server and just expose a user interface acrossed the internet, or do you want to download the app to the local machine and run it there??
|
|
|
|
|
Hi Dave,
By the help of you & mr.Johan I have completed this small project. But I have 3 more users located in different place. Not in LAN. Now my intention is, those users has to connect with my server, and through this program, they have to give entries and feed their data's.
For that what I have to do? Can you provide any samples to learn?
ThankYou 
|
|
|
|
|
No need to download anything, just they have to connect with my server & run my program.
ThankYou
|
|
|
|
|
And what sort of services does this server expose? Is it a file server, web server, SQL Server, ftp server, ... What does this server host that the clients need to connect to??
If your app is already installed on these remote clients and you need them to connect to a SQL Server on your end, you need to expose the SQL Server using different methods other than normal access. Exposing an SQL Server directly to the internet is as about as safe as dousing it in gasoline and lighting a match.
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
