Skip Menu |

This queue is for tickets about the PDF-API2 CPAN distribution.

Report information
The Basics
Id: 29103
Status: resolved
Priority: 0/
Queue: PDF-API2
People
Owner: Nobody in particular
Requestors: boronk [...] boronk.de
Cc:
AdminCc:
Bug Information
Severity: Wishlist
Broken in: (no value)
Fixed in: (no value)

History Show all quoted text
  Sat Sep 01 10:49:51 2007 boronk [...] boronk.de - Ticket created
Subject: Video and Audio
Hello, As far as I know, it is possible for Adobe Acrobat to embed flash, video and audiofiles in a PDF. Now would it be possible to integrate these features in PDF::API2 Christian
  Sat Sep 01 21:11:50 2007 alfredreibenschuh [...] gmx.net - Correspondence added
what do you have in mind?
  Sat Sep 01 21:11:54 2007 The RT System itself - Status changed from 'new' to 'open'
  Sun Sep 02 03:53:58 2007 boronk [...] boronk.de - Correspondence added
From: boronk [...] boronk.de
On Sa. 01. Sep. 2007, 21:11:50, AREIBENS wrote: Show quoted text
> what do you have in mind?
Things like shown in this PDF: http://www.acrobatusers.com/tutorials/2006/adding_video/adding_video.pdf Such features do exist as far as I know since PDF 1.3 or earlier. Christian
  Sun Sep 02 05:31:01 2007 alfredreibenschuh [...] gmx.net - Correspondence added
please insert the following in Annotation.pm and report if it is sufficient for you purpose: #--------------------------------------------------------- =item $ant->movie $file, $contentype, %opts Defines the annotation as a movie from $file with $contentype and options %opts (-rect). =cut sub movie { my ($self,$file,$contentype,%opts)=@_; $self->{Subtype}=PDFName('Movie'); $self->{A}=PDFBool(1); $self->{Movie}=PDFDict(); $self->{Movie}->{F}=PDFDict(); $self->{' apipdf'}->new_obj($self->{Movie}->{F}); my $f=$self->{Movie}->{F}; $f->{Type}=PDFStr('EmbeddedFile'); $f->{Subtype}=PDFStr($contentype); $f->{' streamfile'}=$file; $self->rect(@{$opts{-rect}}) if(defined $opts{-rect}); return($self); } #---------------------------------------------------------
  Sun Sep 02 06:34:14 2007 alfredreibenschuh [...] gmx.net - Correspondence added
sorry, squashed some bugs. #---- =item $ant->movie $file, $contentype, %opts Defines the annotation as a movie from $file with $contentype and options %opts (-rect). =cut sub movie { my ($self,$file,$contentype,%opts)=@_; $self->{Subtype}=PDFName('Movie'); $self->{A}=PDFBool(1); $self->{Movie}=PDFDict(); $self->{Movie}->{F}=PDFDict(); $self->{' apipdf'}->new_obj($self->{Movie}->{F}); my $f=$self->{Movie}->{F}; $f->{Type}=PDFName('EmbeddedFile'); $f->{Subtype}=PDFName($contentype); $f->{' streamfile'}=$file; $self->rect(@{$opts{-rect}}) if(defined $opts{-rect}); return($self); } #----
  Thu Jan 17 19:19:06 2008 alfredreibenschuh [...] gmx.net - Correspondence added
not answered
  Thu Jan 17 19:19:08 2008 alfredreibenschuh [...] gmx.net - Status changed from 'open' to 'resolved'