在Mac OS X上的任何应用程序中获取打开文件的路径？

我为Mac OS X安装了Afloat，我真的很喜欢它有一个“在Finder中显示当前文件”的快捷方式。这适用于基本上用Cocoa编写的所有应用程序。

我可以使用类似的东西，可能是applescript和脚本菜单来获取当前打开文件的路径，可能在任何应用程序中？我希望能够将其设置为快捷键（我可以管理该部分）。

谢谢！

tell application (path to frontmost application as text)
    set p to path of document 1
end tell

tell application "Finder"
    reopen
    activate
    set selection to {}
    set target of window 1 to POSIX file p
end tell