Issue 10745 - exporting entire presentations to jpeg
Summary: exporting entire presentations to jpeg
Status: CLOSED DUPLICATE of issue 5580
Alias: None
Product: Impress
Classification: Application
Component: code (show other issues)
Version: OOo 1.0.1
Hardware: PC Windows XP
: P3 Trivial (vote)
Target Milestone: ---
Assignee: bettina.haberer
QA Contact: issues@graphics
URL:
Keywords:
Depends on:
Blocks:
 
Reported: 2003-01-17 21:43 UTC by Unknown
Modified: 2003-09-08 16:54 UTC (History)
1 user (show)

See Also:
Issue Type: ENHANCEMENT
Latest Confirmation in: ---
Developer Difficulty: ---

Attachments
Add an attachment (proposed patch, testcase, etc.)

Note You need to log in before you can comment on or make changes to this issue.
Description Unknown 2003-01-17 21:43:57 UTC 
A feature that our facility uses a lot from Power Point that I was hoping open 
office supported and I hope you will support is the ability to "bulk" export a 
presentation to jpeg "slides" in one command.  in powerpoint, for an example, 
you can save as jpeg and it asks if you wish to save the entire presentation 
as jepgs.  If you say yes it exports to a directory using the name you specify 
as the "filename" when you do save as and it puts each slide in the directory 
as "slide1", "slide2", and so forth.  I prefer the export option for saving 
out to non presentation formats but we deal with exporting 60+ splides at a 
time which could get time consuming since the bulk export of Power Point can 
do many more in the same time a human can click to do just 2.
Comment 1 wolframgarten 2003-01-20 07:30:56 UTC 
Set to new.
Comment 2 wolframgarten 2003-01-20 07:31:23 UTC 
Reassigned to Bettina.
Comment 3 sven.jacobi 2003-01-20 11:47:24 UTC 
SJ: This feature can already be realized with a basic macro, you just 
need to put the following two macro statements into the standard 
OpenOffice macro module. Then you can assign a key to the 
ExportDocument macro. The macro saves each page to c:\ and is naming 
the files as follow: “test0.jpg”, “test1.jpg”. The macro was made for 
testing purposes, so it is not perfect. Feel free to improve the 
macro that it fulfils your requirements. I am not sure if the macro 
is already working with OOo 1.0, but it is surely working with OOo 
1.0.1

Sub ExportDocument
	Dim sFileUrl As String
	xDoc = thiscomponent
	nCount = xDoc.DrawPages.Count()
	for n = 0 to nCount - 1
	sFileUrl = "file:///c:/test" + n + ".jpg"
	xPage = xDoc.DrawPages( n )
	ExportPage( xPage, sFileUrl )
	next n
End Sub

Sub ExportPage( XPage, sFileUrl As String  )
	xExporter = createUnoService
( "com.sun.star.drawing.GraphicExportFilter" )
	xExporter.SetSourceDocument( xPage )

	Dim aArgs (3) as new com.sun.star.beans.PropertyValue
	Dim aURL as new com.sun.star.util.URL
	
	aURL.complete = sFileUrl
	aArgs(0).Name = "MediaType"
	aArgs(0).Value = "image/jpeg"
	aArgs(1).Name = "URL"
	aArgs(1).Value = aURL
	aArgs(2).Name = "Width"
	aArgs(2).Value = 1280
	aArgs(3).Name = "Height"
	aArgs(3).Value = 1024
	xExporter.filter( aArgs() )
End Sub
Comment 4 horkana 2003-04-15 20:13:54 UTC 
This seems to be a duplicate of bug 5580

Save all slides of a presentation into numbered graphics files in one step
http://www.openoffice.org/project/www/issues/show_bug.cgi?id=5580
Comment 5 bettina.haberer 2003-07-18 13:38:03 UTC 
Set duplicate to 5580.

*** This issue has been marked as a duplicate of 5580 ***
Comment 6 bettina.haberer 2003-07-18 13:38:29 UTC 
Closed as duplicate to 5580.