我想收缩缩小PDF的一些信息,目前拉伸两页缩小以适合单个PDF文档,但我试过-dPDFFitPage,但没有任何区别。 任何意见赞赏! 由于我的新帐户造成的道歉我还无法发布图片。使用Ghostscript缩小PDF以适合一个页面
回答
如果您的内容位于2页上,则需要将2页缩小为1页。 -dPDFFitPage适合单页到单页媒体,所以它不会为你做这件事。
你需要的是2合1拼版,我写了这个给别人,它可能为你工作:
%!PS
% Copyright (C) 2011 Artifex Software, Inc. All rights reserved.
%
% This software is provided AS-IS with no warranty, either express or
% implied.
%
% This software is distributed under license and may not be copied,
% modified or distributed except as expressly authorized under the terms
% of the license contained in the file LICENSE in this distribution.
%
% For more information about licensing, please refer to
% http://www.ghostscript.com/licensing/. For information on
% commercial licensing, go to http://www.artifex.com/licensing/ or
% contact Artifex Software, Inc., 101 Lucas Valley Road #110,
% San Rafael, CA 94903, U.S.A., +1(415)492-9861.
%
% Make a PDF file '2-up'
% This program deliberately does NOT attempt to preserve metadata
% such as DEST links, bookmarks and so forth as these will be
% mostly incorrect after imposition.
%
% usage: gs -dNODISPLAY -sFile=____.pdf [-dVerbose] 2-up.ps
%
% Make, and open, a working dictionary to store stuff
%
/PDF_2UPDict 20 dict dup begin def
%
% Check the parameters to see they are present and of the correct type
%
/Usage {
( usage: gs -dNODISPLAY -q -sFile=____.pdf [-dVerbose] 2-up.ps\n) =
flush
quit
} bind def
/File where not {
(\n *** Missing source file. \(use -sFile=____.pdf\)\n) =
Usage
} {
pop
}ifelse
/Verbose where not {
/Verbose false def
}{
pop /Verbose true def
} ifelse
%%
%% This code is copied from pdf_main.ps, pdfshowpage_finish
%% sadly that routine always calls showpage, and we want that
%% to be under our control, so we have to duplicate the code
%% here. Not only that but it uses GS extensions which aren't
%% available outside of startup, so some things it simply can't
%% replicate. As a result some of the error handling is less
%% good.
%%
%% I plan to extend the PDF interpreter with two new
%% routines, pdfnoshowpage_finish and then have both
%% that and pdfshowpage_finish call pdfoptionalshowpage_finish
%% which will take a boolean determining whether to actually
%% call the showpage. At that time we'll alter this code.
%%
/draw_page_content { % <pagedict> pdfshowpage_finish -
save /PDFSave exch store
/PDFdictstackcount countdictstack store
/PDFexecstackcount count 2 sub store
(before exec) VMDEBUG
% set up color space substitution (this must be inside the page save)
pdfshowpage_setcspacesub
% Display the actual page contents.
8 dict begin
/BXlevel 0 def
/BMClevel 0 def
/OFFlevels 0 dict def
/BGDefault currentblackgeneration def
/UCRDefault currentundercolorremoval def
%****** DOESN'T HANDLE COLOR TRANSFER YET ******
/TRDefault currenttransfer def
matrix currentmatrix
2 dict
dictbeginpage setmatrix
/DefaultQstate qstate store
count 1 sub /pdfemptycount exch store
% If the page uses any transparency features, show it within
% a transparency group.
dup pageusestransparency dup /PDFusingtransparency exch def {
% Show the page within a PDF 1.4 device filter.
0 .pushpdf14devicefilter {
/DefaultQstate qstate store % device has changed -- reset DefaultQstate
% If the page has a Group, enclose contents in transparency group.
% (Adobe Tech Note 5407, sec 9.2)
dup /Group knownoget {
1 index /CropBox pget {
/CropBox exch
} {
1 index get_media_box pop /MediaBox exch
} ifelse
oforce_elems normrect_elems fix_empty_rect_elems 4 array astore .beginformgroup
showpagecontents
.endtransparencygroup
} {
showpagecontents
} ifelse
} stopped {
% abort the transparency device
.abortpdf14devicefilter
/DefaultQstate qstate store % device has changed -- reset DefaultQstate
stop
} if .poppdf14devicefilter
/DefaultQstate qstate store % device has changed -- reset DefaultQstate
} {
showpagecontents
} ifelse
.free_page_resources
% todo: mixing drawing ops outside the device filter could cause
% problems, for example with the pnga device.
end % scratch dict
% Some PDF files don't have matching q/Q (gsave/grestore) so we need
% to clean up any left over dicts from the dictstack
PDFdictstackcount //false
{ countdictstack 2 index le { exit } if
currentdict /n known not or
end
} loop
pop
count PDFexecstackcount sub { pop } repeat
Repaired % pass Repaired state around the restore
PDFSave restore
currentglobal pdfdict gcheck .setglobal
.setglobal
/Repaired exch def
} bind def
%%
%% First we open the PDF file
%%
File dup (r) file runpdfbegin pop
process_trailer_attrs
%%
%% FInd out how many pages are in teh PDF file
%%
/PDFPageCount pdfpagecount def
Verbose {(PageCount is) print PageCount ==} if
%
% Set up our bookkeeping
%
% First get the size of the page from page 1 of the PDF file
% We assume that all PDF pages are the same size.
%
1 pdfgetpage get_any_box
exch pop dup 2 get exch 3 get
/PDFHeight exch def
/PDFWidth exch def
PDFWidth PDFHeight gt {
/PDFLandscape true def
}{
/PDFLandscape false def
}ifelse
Verbose{
(PDFHeight is) print PDFHeight ==
(PDFWidth is) print PDFWidth ==
(PDFLandscape is) print PDFLandscape ==
} if
%
% Now get the page size of the current device. We will fit
% the PDF pages onto this using rotation and scaling as
% required.
%
currentpagedevice /PageSize get
dup 0 get /PageWidth exch def
1 get /PageHeight exch def
PageWidth PageHeight gt {
/PageLandscape true def
}{
/PageLandscape false def
}ifelse
Verbose{
(PageHeight is) print PageHeight ==
(PageWidth is) print PageWidth ==
(PageLandscape is) print PageLandscape ==
} if
%
% Now figure out how best to fit the pages 2-up
%
PageLandscape PDFLandscape and {
%% Both landscape
/ScaleY PageHeight PDFWidth div
/ScaleX PageWidth 2 div PDFHeight div
ScaleX ScaleY lt {
/Scale ScaleX def
} {
/Scale ScaleY def
}ifelse
/Rotate 90
/OriginYTx PDFHeight neg def
/OriginXTx 0 def
/PageYTx PDFHeight def
/PageXTx 0 def
}{
PageLandscape {
%% Page is landscape, PDF is portrait
/ScaleY PageHeight PDFHeight div def
/ScaleX PageWidth 2 div PDFWidth div def
ScaleX ScaleY lt {
/Scale ScaleX def
} {
/Scale ScaleY def
}ifelse
/Rotate 0 def
/OriginXTx 0 def
/OriginYTx 0 def
/PageXTx PDFWidth def
/PageYTx 0 def
}{
PDFLandscape {
%% PDF is landscape, Page is portrait
/ScaleY PageHeight 2 div PDFHeight div def
/ScaleX PageWidth PDFWidth div def
ScaleX ScaleY lt {
/Scale ScaleX def
} {
/Scale ScaleY def
}ifelse
/Rotate 0 def
/OriginXTx 0 def
/OriginYTy PDFHeight def
/PageXTx 0 def
/PageYTx PDFHeight neg def
} {
%% Both portrait
/ScaleY PageHeight 2 div PDFWidth div def
/ScaleX PageWidth PDFHeight div def
ScaleX ScaleY lt {
/Scale ScaleX def
} {
/Scale ScaleY def
}ifelse
/Rotate 90 def
/OriginXTx 0 def
/OriginYTx PDFHeight neg def
/PageYTx 0 def
/PageXTx PDFWidth def
} ifelse
}ifelse
} ifelse
Verbose{
(ScaleX is) print ScaleX ==
(ScaleY is) print ScaleY ==
(Scale is) print Scale ==
(Rotate is) print Rotate ==
(OriginXTx is) print OriginXTx ==
(OriginYTx is) print OriginYTx ==
(PageXTx is) print PageXTx ==
(PageYTx is) print PageYTx ==
} if
%
% Starting at 0, count by 2, and stop at the last page, however
% account for the fact that the number of pages in the PDF
% file may not be even, in which case draw a final empty
%page
%
0 2 PDFPageCount 1 sub PDFPageCount 2 mod add {
%% loop counter
save %% save the state
exch %% exch the save state and the loop counter
Rotate rotate %%
Scale Scale scale %% set up our calculated CTM
OriginXTx OriginYTx translate %%
save %% and save this too
exch %% swap the save state and the loop counter
dup 1 add %% copy the loop counter, then add 1, stack: -save- -save- loop loop+1
Verbose {(Drawing page) print dup ==} if
0 0 PageWidth PageHeight rectclip %% clip the page contents to the page size (in case of bleeds)
pdfgetpage %% get the page from the PDF file, stack: -save- -save- loop -dict-
dup /Page exch store %% save a copy of the page dict inside itself
pdfshowpage_init %% initialise the page
draw_page_content %% se above, draws the graphical objects, stack -save- -save- loop
exch %% swap back teh save object, stack: -save- loop -save-
restore %% restore back to our calculated CTM
PageXTx PageYTx translate %% Move to draw page 2
2 add dup PDFPageCount gt { %% If we have to draw an extra page, and this is it
Verbose {(Drawing extra page) print dup ==} if
pop showpage %% pop the spare loop and draw an empty page, stack: -save-
}{
Verbose {(Drawing page) print dup ==} if
0 0 PageWidth PageHeight rectclip
pdfgetpage
dup /Page exch store
pdfshowpage_init % <pagedict>
draw_page_content
showpage
} ifelse
restore %% restore back to the original CTM
} for
//runpdfend exec %% End the PDF file
end %% our working dictioanry
它总是一个好主意后,其中一个例子PDF文件,可以看到一个URL ,这意味着人们可以找出实际需要的东西,并测试解决方案。
谢谢你KenS我会给这个镜头。 – dominoharvey
嘿肯,我一直没有能够得到这个工作。不幸的是,因为我的StackFlow帐户是新的,我无法发布图像。这是我测试过的方式,当我打印到PDF时,它适合于一个页面,然后打印它在两页上打印的PDF。我知道我现在有什么可能不太正确... wshshell.run“.. \ common \ gs \ bin \ gswin32c.exe -q -dBATCH -dNOPAUSE -dNOOUTERSAVE -I .. \ common \ gs \ lib -sDEVICE = pdfwrite -dPDFFitPage -r300x300 -g2306x6036 -sOutputFile =“&strCMD1&”。pdf“&strCMD1,0,true – dominoharvey
你可以发布一个URL来查看示例PDF文件吗? (如果敏感的话,不一定是真实的,只是看起来相同)。我想我不明白你的文件是什么样的.... – KenS
- 1. 使用ImageMagick或Ghostscript(或其他)来缩放PDF以适合页面?
- 2. 用Ghostscript指定PDF页面大小
- 3. 使用Ghostscript缩小PDF格式文本
- 4. 告诉abcPdf缩放html以适合单个pdf页面
- 5. 使用Ghostscript禁止PDF页面旋转
- 6. 用Java缩放图以适合一个打印页面
- 7. 使用Ghostscript调整多页混合格式PDF的大小?
- 8. Ghostscript的合并的PDF压缩结果
- 9. 使用GhostScript获取页面大小
- 10. 调整IText pdf的大小,使文本适合在一个页面上
- 11. 告诉飞碟或BIRT缩放HTML以适合单个pdf页面
- 12. 如何使用Rotativa将内容缩小到单个PDF页面?
- 13. CGContext上PDF页面方面适合
- 14. 使用ghostscript缩小PDF导致图像不被alinged
- 15. 如何使z指数适合页面,而不是缩小
- 16. 合并多个PDF文件合并成一个用PHP Ghostscript的
- 17. 虾 - 缩小内容以便它适合一页
- 18. PDF columtext缩小到适合使用iText或iTextSharp
- 19. Ghostscript PDF批量压缩
- 20. ghostscript pdf至缩略图
- 21. 使用Ghostscript减少PDF文件大小
- 22. 使用Ghostscript调整PDF大小
- 23. NSStatusItem是否可以缩小以适合?
- 24. 缩小pdf页面的内容
- 25. 使用JavaScript调整页面大小以适合页面(要打印)
- 26. 使用ghostscript将页码添加到pdf
- 27. 在ghostscript中使用PDF页码
- 28. 在ghostscript中适合页面大小(可能有损坏的输入)
- 29. 什么是适合iPad的PDF页面大小(dpi)?
- 30. 缩小图像以适合div
更多细节将不胜感激。 – Skylion