Следующий Applescript должен работать:
on run
tell application "System Events"
tell current desktop
set desktopProperties to (get item 3 of (get properties as list) as text)
end tell
end tell
tell application "Finder"
reveal desktopProperties
end tell
end run
В Snow Leopard, чтобы превратить это в полезное действие, откройте Automator.app и в меню шаблона выберите Service .
В верхней панели сделайте так: Сервис не получает No input ни в any application . Затем перетащите « Run Applescript из панели «Библиотека» под ним и вставьте приведенный выше код Applescript в это окно (заменив код шаблона по умолчанию).
Сохраните его как рабочий процесс с соответствующим названием (например, Show Wallpaper). Затем это будет отображаться как действие в меню «Службы» всех приложений, или вы можете назначить ему сочетание клавиш на панели « System Preferences\Keyboard Shortcuts разделе « Services .
Рекомендации:
- http://ask.metafilter.com/89541/OSX-Leopard-How-to-show-the-current-wallpaper-in-finder