macos - 在不丢失格式样式的情况下编辑剪贴板文本并连续运行脚本

Question

我正在使用这个 AppleScript 来编辑我的剪贴板数据。但是有些事情我不知道该怎么做:

1. 此脚本删除剪贴板中文本的整个格式样式。有没有办法保留所有格式？

2. 我尝试将此脚本作为应用程序运行(在保存时选中保持打开状态)，但它在重新启动后只能运行一次，并且不会编辑任何新复制的文本。我怎样才能让这个脚本连续运行？

这是我的脚本:

on idle

    get the clipboard
    replacement of "SqlConnection" by "OleDbConnection" for the result
    replacement of "SqlDataAdapter" by "OleDbDataAdapter" for the result
    set the clipboard to (replacement of "SqlCommand" by "OleDbCommand" for the result)

end idle

on replacement of oldDelim by newDelim for sourceString
    set oldTIDs to text item delimiters of AppleScript
    set text item delimiters of AppleScript to oldDelim
    set strtoks to text items of sourceString
    set text item delimiters of AppleScript to newDelim
    set joinedString to strtoks as string
    set text item delimiters of AppleScript to oldTIDs
    joinedString
end replacement

Answer 1

坦率地说，维护格式的最简单方法是使用样式化的文本编辑器(如 Text Edit 或 Pages)作为中间阶段并在那里进行操作。即在 Pages 中打开一个新文档，粘贴您的文本，查找并替换以修改文本，使用 GUI 脚本全选，然后将其复制回剪贴板。

您也可以使用此技术来设置样式模板，填写数据库信息，然后将其打印或放入剪贴板。我经常用这个。我只希望你能用 Numbers 做到这一点。 (数字的查找和替换没有键盘选项)

编辑:这里有一个快速而粗略的示例脚本，它使用 Pages 作为中间位置来查找和替换将保持格式的文本。

tell application "Pages"
    activate
    make new document
end tell

tell application "System Events"
    tell process "Pages"
        -- paste clipboard
        keystroke "v" using (command down)
        -- go to top of document
        key code 126 using (command down)
        -- open find window
        keystroke "f" using (command down)
        -- set word to replace
        keystroke "original"
        -- tab to replace field
        keystroke tab
        -- set word to replace with
        keystroke "newword"
        -- press replace all button
        click button "Replace All" of tab group 1 of window "Find & Replace"
        -- close find window
        keystroke "w" using (command down)
        -- select all text
        keystroke "a" using (command down)
        -- copy back to clipboard
        keystroke "c" using (command down)
    end tell
end tell