如何以编程方式从 OSX 上的任何文档生成 PDF？

Question

我正在开发一个 OSX 项目，用户可以（从任何应用程序中）选择我需要从中生成 PDF 的文档集合。 标准 Macintosh 打印对话框有一个 PDF 按钮，其中包含许多与 PDF 相关的命令，包括“另存为 PDF...”。 但是，我需要生成 PDF 文件而不需要用户交互。 我理想地希望它适用于任何类型的文档。

以下是我迄今为止探索过的选项：

• 自动化操作。 Automator 有一个 PDF 库，但它提供了处理 PDF 文件的操作，而不是生成它们。 有一个 Finder 操作可以打印任何文件，但只能打印到真正的打印机。
• AppleScript。 某些应用程序能够生成 PDF 文件（例如，如果您将“在“test.pdf”中保存文档””发送到 Pages，它将生成 PDF（但这仅适用于 Pages - 我需要支持任何类型的文档）自
• 用户与打印列表中的额外打印机混淆的想法。

定义打印机。我可以创建一个虚拟打印机驱动程序，然后使用自动操作，但我不喜欢让 应用程序就像用户正在执行以下步骤：

1. 执行 Cmd-P（打开打印对话框）
2. 单击“PDF”按钮
3. 选择“另存为 PDF...”（菜单中的第二项）
4. 在保存对话框中键入文件名
5. 单击“保存”

如果这是最好的方法（是吗？），那么真正的问题是：如何将 UI 事件发送到外部应用程序（击键、鼠标事件、菜单选择）

更新： 只是为了？澄清一点：我需要转换为 PDF 的文档是由其他应用程序创建的文档，例如，用户可能会选择 Word 文档、Numbers 电子表格、OmniGraffle 绘图或网页。 。 共同点是每个文档都有一个关联的应用程序，并且该应用程序知道如何打印它（并且 OSX 知道如何将打印输出呈现为 PDF 文件）。

因此，Cocoa Dev Central 中的示例没有帮助，因为它们是关于从我的应用程序生成 PDF。

Answer 1

我认为您可以使用 applescript 打开文档，然后使用 applescript UI 脚本 调用打印菜单。

例如 ：

tell application "System Events"
        tell window of process "Safari"
            set foremost to true
            keystroke "p" using {command down}
            delay 3
            click menu button "PDF" of sheet 2
            click menu item "Save as PDF…" of menu 1 of menu button "PDF" of sheet 2
            keystroke "my_test.file"
            keystroke return
            delay 10
        end tell

    end tell

Answer 2

看一下名为 CUPS-PDF

它是 OS X 的虚拟打印机，它执行通过普通打印机打印时“另存为 PDF”方法执行的操作，只不过通过它的每个打印作业都会生成 pdf 输出。

安装后，您可以使用 lp 命令创建 shell 或 AppleScript。

例如，一旦设置了虚拟打印机，您就可以打印 test.txt 并将其自动保存为 pdf。 要使用 AppleScript 执行此操作，您将使用以下代码：

do shell script "lp -d CUPS_PDF test.txt"

CUPS-PDF 应用程序将所有输出保存到 /Users/Shared/CUPS-PDF。 我不确定您是否可以更改该路径，但您可以在脚本中检索该文件并移动它。

但有一些注意事项。

首先，lp命令无法打印.doc文件。 我认为还有一些其他第三方应用程序可以让您执行此操作。

其次，CUPS-PDF 应用程序在系统首选项的打印机窗格中显示其名称中包含连字符，但 CUPS 将队列名称显示为包含下划线。 因此，在命令行上您需要引用 CUPS 队列名称，即带下划线的 CUPS_PDF。

即使您发现通过 lp 命令构建脚本不是很有用
并且仍然想要涉及 GUI 脚本，那么拥有虚拟打印机应该可以节省您一些步骤。

Answer 3

你可以用这样的杯子

    on open afile
        set filename to name of (info for afile)
        tell application "Finder"
            set filepath to (container of (afile as alias)) as alias
        end tell
        set filepath to quoted form of POSIX path of filepath
        set tid to AppleScript's text item delimiters
        set AppleScript's text item delimiters to "."
        set filename to text item 1 of filename
        set AppleScript's text item delimiters to tid
        set afile to quoted form of POSIX path of afile
        do shell script "cupsfilter " & afile & " > " & filepath & filename & ".pdf"
    end open

Answer 4

我为此在 bash 中创建了一个别名：

convert2pdf() {
  /System/Library/Printers/Libraries/convert -f "$1" -o "$2" -j "application/pdf"
}

Answer 5

我在 Automator 的帮助下输入了下面的代码（记录一个动作，然后将特定动作拖出“Watch Me Do”窗口以获得 Applescript）。 如果您想从 Safari 以外的应用程序打印 PDF，您可能必须运行相同的过程并围绕“打印”对话框调整此 Applescript，因为每个程序可能有不同的打印 GUI。

# Convert the current Safari window to a PDF
# by Sebastain Gallese

# props to the following for helping me get frontmost window
# http://stackoverflow.com/questions/480866/get-the-title-of-the-current-active-window-            document-in-mac-os-x

global window_name

# This script works with Safari, you might have
# to tweak it to work with other applications 
set myApplication to "Safari"

# You can name the PDF whatever you want
# Just make sure to delete it or move it or rename it
# Before running the script again
set myPDFName to "mynewpdfile"

tell application myApplication
    activate
    if the (count of windows) is not 0 then
        set window_name to name of front window
    end if
end tell

set timeoutSeconds to 2.0
set uiScript to "keystroke \"p\" using command down"
my doWithTimeout(uiScript, timeoutSeconds)
set uiScript to "click menu button \"PDF\" of sheet 1 of window \"" & window_name & "\" of application process \"" & myApplication & "\""
my doWithTimeout(uiScript, timeoutSeconds)
set uiScript to "click menu item 2 of menu 1 of menu button \"PDF\" of sheet 1 of window \"" & window_name & "\" of application process \"" & myApplication & "\""
my doWithTimeout(uiScript, timeoutSeconds)
set uiScript to "keystroke \"" & myPDFName & "\""
my doWithTimeout(uiScript, timeoutSeconds)
set uiScript to "keystroke return"
my doWithTimeout(uiScript, timeoutSeconds)

on doWithTimeout(uiScript, timeoutSeconds)
    set endDate to (current date) + timeoutSeconds
    repeat
        try
            run script "tell application \"System Events\"
" & uiScript & "
end tell"
            exit repeat
        on error errorMessage
            if ((current date) > endDate) then
                error "Can not " & uiScript
            end if
        end try
    end repeat
end doWithTimeout

Answer 6

“/系统/库/打印机/库/./convert”
在 MacOS 的更高版本中已被删除。

您现在可以使用 sip。 AppleScript 示例：
执行shell脚本：sips -s format pdf Filename.jpg --out Filename.pdf