Hjälp med AppleScript

Tråden skapades och har fått 4 svar. Det senaste inlägget skrevs .
1
  • Medlem
  • Trollhättan
  • 2007-07-08 20:33

Hejsan, hittade ett AppleScript som ska stänga av Aktiva skärmhörn.

-- © Copyright 2006, Jan Lehnardt <jan@prima.de>. All Rights Reserved.
-- Permission to copy granted for personal use only. All copies of this script
-- must retain this copyright information and all lines of comments below, up
-- to and including the line indicating "End of Jan's Comments". 
--
-- Any commercial distribution of this code must be licensed from the
-- Copyright owner, Jan Lehnardt.
--
-- This script disables the four screen corners. It comes in handy, when you
-- use the accompanying enableHotCorners script to enable the screen corners.
-- This is useful, if you don't need Exposé and Dashboard in a fullscreen
-- application.
--
-- 
--
-- Version 1.0
--	- Initial release
--
--
-- Thanks to Daniel Jalkud and his fabulous FastScripts application.
--
-- End of Jan's Comments
tell application "System Preferences"
	activate
	set current pane to pane "com.apple.preference.expose"
end tell


tell application "System Events"
	if not UI elements enabled then
		tell application "System Preferences"
			set current pane to pane "com.apple.preference.universalaccess"
		end tell
		--thanks to http://www.oreillynet.com/mac/blog/2006/07/ap...
		display dialog "Please check the box called \"Enable access for assistive devices.\"" buttons {"Okay"} with icon 1 default button 1
		
	end if
end tell

on setHotCornerAction(hotCorner, hotAction)
	tell application "System Events"
		tell process "System Preferences"
			tell window "Dashboard & Exposé"
				tell group 1
					tell pop up button hotCorner
						click
						tell menu 1
							tell menu item hotAction
								click
							end tell
						end tell
					end tell
				end tell
			end tell
		end tell
	end tell
	delay 0.2
end setHotCornerAction


setHotCornerAction(1, "-") -- top left
setHotCornerAction(2, "-") -- bottom left
setHotCornerAction(3, "-") --top right
setHotCornerAction(4, "-") -- bottom left

tell application "System Preferences" to quit


Problemet är att det blir ett: System Events drabbades av ett fel: NSReceiverEvaluationScriptError: 4 vid

tell pop up button hotCorner
click
tell menu 1

Du vet att du i systeminställningar kan välja att inget ska hända när du går till skärmhörnen?
Systeminställningar > Skrivbord och skärmsläckare > Skärmsläckare
Klicka på Aktiva hörn.
Välj "-" på alla hörn där du vill att det inte ska hända något.

  • Medlem
  • Trollhättan
  • 2007-07-08 22:12

Det här scriptet kör via Dashboard och Exposé.. det går det med.. testa kör scriptet så får du se. Jag tror att felet ligger i variabeln som identifierar vilken combobox som ska klickas på.

  • Medlem
  • Stockholm
  • 2007-07-09 00:14

Fungerar hos mig, men jag kör amerikanskt system för tillfället. Kan det vara så att du kör svenskt?

Vänligen, Ylan

  • Medlem
  • Trollhättan
  • 2007-07-09 00:16

Ja det gör ja. Måste vara någon skillnad.

1
Bevaka tråden