VFW

[Voltrox]

Hello,

Since GLScene won't play videos.

I'll try Video For Windows, which seems to work, but I have searched and not seen a single Video for windows tutorial or example.

could someone please help me?

[Traveler]

Video For Windows?
I remember having that in windows 3.x

Is that even used nowadays?

[Voltrox]

Yeah, I saw recommendations of it as a Delphi API.

I think it's still used.

"vfw.pas"

But I would greatly appreciate it if someone could help me use video for windows or recommend a Video API/library for Delphi...

please?

Thank you.

[JernejL]

try DSpack - www.progdigy.com

[Relfos]

Don't use VFW, its obsolete, I couldnt get it to play videos encoded with most common codecs.
The alternative is use DirectShow to decode the videos, or use some library to do that work for you. Check out that DSPack that delfi recommended.

[Voltrox]

I am using Delphi 2006.

It said: "Cannot find resource file DSPackDesign_D&.res. Recreated."

Then when I tried to compile that package, I got the following errors:

[Pascal Error] DirectDraw.pas(359): E2154 Type 'IDirectDrawSurface' needs finalization - not allowed in variant record
[Pascal Error] DirectDraw.pas(366): E2154 Type 'IDirectDrawSurface' needs finalization - not allowed in variant record
[Pascal Error] DirectDraw.pas(376): E2154 Type 'IDirectDrawSurface' needs finalization - not allowed in variant record
[Pascal Error] DirectDraw.pas(383): E2154 Type 'IDirectDrawSurface' needs finalization - not allowed in variant record
[Pascal Error] DirectDraw.pas(395): E2154 Type 'IDirectDrawSurface' needs finalization - not allowed in variant record
[Pascal Error] DirectDraw.pas(835): E2154 Type 'IDirectDrawSurface' needs finalization - not allowed in variant record
[Pascal Error] DirectDraw.pas(837): E2154 Type 'IDirectDrawSurface' needs finalization - not allowed in variant record
[Pascal Fatal Error] DirectX9_D7.dpk(43): F2063 Could not compile used unit '..\src\DirectX9\DirectDraw.pas'

[Clootie]

I bet that you need to update JEDI.inc file to version that supports Delphi2006.

Try one from here: http://delphi-dx9sdk.cvs.sourceforge.net/delphi-dx9sdk/Headers/

[Voltrox]

I did, and it gave me the same error when i tried to compile the package again, do I have to remake the package?

I got 53 errors this time:

[Pascal Error] Direct3D9.pas(5): E2029 'UNIT' expected but '<' found
[Pascal Error] Direct3D9.pas(5): E2038 Illegal character in input file: '"' (#$22)
[Pascal Error] Direct3D9.pas(6): E2038 Illegal character in input file: '"' (#$22)
[Pascal Error] Direct3D9.pas(7): E2038 Illegal character in input file: '"' (#$22)
[Pascal Error] Direct3D9.pas(8): E2038 Illegal character in input file: '!' (#$21)
[Pascal Error] Direct3D9.pas(12): E2038 Illegal character in input file: '"' (#$22)
[Pascal Error] Direct3D9.pas(12): E2038 Illegal character in input file: '"' (#$22)
[Pascal Error] Direct3D9.pas(12): E2038 Illegal character in input file: '"' (#$22)
[Pascal Error] Direct3D9.pas(13): E2038 Illegal character in input file: '"' (#$22)
[Pascal Error] Direct3D9.pas(13): E2038 Illegal character in input file: '"' (#$22)
[Pascal Error] Direct3D9.pas(13): E2038 Illegal character in input file: '"' (#$22)
[Pascal Error] Direct3D9.pas(13): E2029 '=' expected but '/' found
[Pascal Error] Direct3D9.pas(16): E2029 '=' expected but identifier 'language' found
[Pascal Error] Direct3D9.pas(16): E2029 Expression expected but '<' found
[Pascal Error] Direct3D9.pas(18): E2029 '..' expected but identifier 'head' found
[Pascal Error] Direct3D9.pas(19): E2029 Expression expected but '<' found
[Pascal Warning] Direct3D9.pas(19): W1023 Comparing signed and unsigned types - widened both operands
[Pascal Error] Direct3D9.pas(20): E2029 Expression expected but '<' found
[Pascal Error] Direct3D9.pas(20): E2038 Illegal character in input file: '"' (#$22)
[Pascal Error] Direct3D9.pas(20): E2029 '=' expected but ';' found
[Pascal Error] Direct3D9.pas(25): E2038 Illegal character in input file: '"' (#$22)
[Pascal Error] Direct3D9.pas(25): E2038 Illegal character in input file: '"' (#$22)
[Pascal Error] Direct3D9.pas(30): E2038 Illegal character in input file: '"' (#$22)
[Pascal Error] Direct3D9.pas(30): E2038 Illegal character in input file: '"' (#$22)
[Pascal Error] Direct3D9.pas(47): E2038 Illegal character in input file: '"' (#$22)
[Pascal Error] Direct3D9.pas(47): E2038 Illegal character in input file: '"' (#$22)
[Pascal Error] Direct3D9.pas(50): E2038 Illegal character in input file: '"' (#$22)
[Pascal Error] Direct3D9.pas(52): E2038 Illegal character in input file: '"' (#$22)
[Pascal Error] Direct3D9.pas(52): E2038 Illegal character in input file: '"' (#$22)
[Pascal Error] Direct3D9.pas(52): E2038 Illegal character in input file: '"' (#$22)
[Pascal Error] Direct3D9.pas(52): E2038 Illegal character in input file: '"' (#$22)
[Pascal Error] Direct3D9.pas(52): E2038 Illegal character in input file: '"' (#$22)
[Pascal Error] Direct3D9.pas(52): E2038 Illegal character in input file: '"' (#$22)
[Pascal Error] Direct3D9.pas(52): E2038 Illegal character in input file: '"' (#$22)
[Pascal Error] Direct3D9.pas(60): E2038 Illegal character in input file: '"' (#$22)
[Pascal Error] Direct3D9.pas(67): E2038 Illegal character in input file: '"' (#$22)
[Pascal Error] Direct3D9.pas(67): E2038 Illegal character in input file: '?' (#$3F)
[Pascal Error] Direct3D9.pas(67): E2038 Illegal character in input file: '"' (#$22)
[Pascal Error] Direct3D9.pas(68): E2038 Illegal character in input file: '"' (#$22)
[Pascal Error] Direct3D9.pas(68): E2038 Illegal character in input file: '"' (#$22)
[Pascal Error] Direct3D9.pas(70): E2038 Illegal character in input file: '"' (#$22)
[Pascal Error] Direct3D9.pas(70): E2038 Illegal character in input file: '?' (#$3F)
[Pascal Error] Direct3D9.pas(70): E2038 Illegal character in input file: '"' (#$22)
[Pascal Error] Direct3D9.pas(78): E2038 Illegal character in input file: '"' (#$22)
[Pascal Error] Direct3D9.pas(78): E2038 Illegal character in input file: '"' (#$22)
[Pascal Error] Direct3D9.pas(78): E2038 Illegal character in input file: '"' (#$22)
[Pascal Error] Direct3D9.pas(78): E2038 Illegal character in input file: '"' (#$22)
[Pascal Error] Direct3D9.pas(79): E2029 Identifier expected but '=' found
[Pascal Error] Direct3D9.pas(79): E2029 ';' expected but '=' found
[Pascal Error] Direct3D9.pas(79): E2029 ';' expected but '=' found
[Pascal Error] Direct3D9.pas(82): E2003 Undeclared identifier: 'select'
[Pascal Error] Direct3D9.pas(82): E2038 Illegal character in input file: '"' (#$22)
[Pascal Error] Direct3D9.pas(82): E2038 Illegal character in input file: '"' (#$22)
[Pascal Fatal Error] Direct3D9.pas(82): E2226 Compilation terminated; too many errors

[Clootie]

Have you looked at Direct3D9.pas? Cos error messages you are getting are a bit weird. Especcially if we assume what about 40 first lines in this file are comments, and compiler can't (?) complain about them.

After changing any INC file - it's recomended to fully rebuild all you projectes referencing that file.

[Voltrox]

Yeah, Direct3D9 had the most errors i think:

[Voltrox]

Ok, I just tried to put those files in a package and compile it but it gave me the same 53 errors.

what do i do?

[Clootie]

You should not replace Direct3D9.pas or any other DX files that came with DSPack (just JEDI.inc). What you inserted definetly is not are correct pascal source file :lol:

Please, either of these
1) replace files you've downloaded with original ones
2) correctly download headers form cvs.sourceforge.net
3) download latest headers from http://www.clootie.ru/delphi/download_dx92.html (but DirectShow.pas is not guarantied to be 100% compatible with other DSPack sources)

[Clootie]

And PLEASE!!!! edit contents of your BIG message by deleting all source code inside it!

It's really bad thing to insert several hundred KBytes of code in forum post!

[Voltrox]

ok, sorry! :)

[Voltrox]

hey,

could you show me an example of code that plays a video with your directshow thing?

I have no idea how to use it.

[WILL]

Warning 1: Do not cut and paste the entire contents of a web page into the forums. If you cannot provide detailed information about a problem you are having do more research, but do not flood or SPAM this site.

[Voltrox]

What happened to my last video thread?

I noticed that there were replies, but I didnt check them, now it's gone.

[savage]

Voltrox, please do not cross-post. I have deleted your duplicate post from this thread as it is not relevant to the VFW thread.

[Voltrox]

Yes, but that is not the only thing that I am concerned about.

My very first Video thread was deleted it seems, it vanished, which is why I had to create this one, and people seem to be ignoring this one, I don't know if it was because of my name or what, but why was my first one deleted?

[savage]

It was never deleted if you mean this thread - http://www.pascalgamedevelopment.com/viewtopic.php?t=3622.

Again I have to ask, have you used a public forum like phpBB before and it's search facilities??

[Voltrox]

Oh. I feel so stupid.

Sorry savage. :(

Yes, I have, some time ago, I didn't use them much though.

[Voltrox]

So basically there are no video libraries for Delphi 2006?

[tanffn]

I’d hate to revive old threads, but the title fits :)
I was thinking about integrating vfw with SDL surface, after a bit of googling I found this unencouraging link:
http://www.libsdl.org/pipermail/sdl/2005-July/069450.html

I wasn’t able to find any code reference (I don’t care if its in c/c++ or Delphi), it will really help me to start. (especially because I didn’t touch (low level)sdl for years :roll: )

[tanffn]

I don’t mean to brag but, It worked on the 1st try :wink:

if anyone wants the code let me know

[GuyWithDogs]

I don’t mean to brag but, It worked on the 1st try :wink:

if anyone wants the code let me know

Can you elaborate on what you managed to do? Based on my very limited familiarty with SDL, it sounds like you've added some way to play video in/on it? How's that different from SMPEG (which was something I did read about, and tried a downloaded example)?

What formats does your implementation support? Is there a runnable demo I can download to try?

Thanks.