My target OS is Windows.On CPAN, windows is called Win32 :D and what you'd do is grab Win32::API and then head on to MSDN and do some reading, so that you can write something similar to Win32::GUI::AxWindow or Wx::ActiveX::WMPlayer or ....
http://perltk.org => http://www.perltk.org/ptknews/recall_me.cgi?Search=video => Re: Embedding media players in Tk ?
Take a look at Win32::MultiMedia (it's on ppm for both ActivePerl 5.6 and 5.8)update: MCI is as easy as Win32::MCI::Basic (just look at Win32::MCI::CD).It uses the MCI interface to play any kind of audio/video using MediaPlayer. You can embed the video in any Tk frame using the id of the frame:
Hope this helps, Thomasuse strict; use Tk; use Win32::MultiMedia::Mci; my $file = shift || 'test.mpg'; my $video_frame = $mw->Frame( -width => 352, -height => 240, -background => 'black' )->pack(-expand => 1); my $mci = Win32::MultiMedia::Mci->open($file, shareable => 1, style => 'child', parent => hex($frame->id) ); $mci->play('');
In reply to Re: Playing video with perl / perltk
by PodMaster
in thread Playing video with perl / perltk
by TROGDOR
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |