diff options
| author | Karsten Silkenbäumer <ksi@kluks.de> | 2012-08-06 16:49:09 +0200 |
|---|---|---|
| committer | Karsten Silkenbäumer <ksi@kluks.de> | 2012-08-06 16:49:09 +0200 |
| commit | f55e53c65094bf83f9da07d6e5d24313452e4ef1 (patch) | |
| tree | ffcca6dcff8c5ffc0fd53964b05709427889766c | |
| parent | b6a7b41783ae5e5277e3bbe5293ee5f1612056cf (diff) | |
Removed scpt sample due to binary file format (extension)
| -rw-r--r-- | samples/AppleScript/center.scpt | 50 |
1 files changed, 0 insertions, 50 deletions
diff --git a/samples/AppleScript/center.scpt b/samples/AppleScript/center.scpt deleted file mode 100644 index 3049271..0000000 --- a/samples/AppleScript/center.scpt +++ /dev/null @@ -1,50 +0,0 @@ -set windowWidth to 800 -set windowHeight to 600 -delay 0.1 - -set AppleScript's text item delimiters to "x" - -set res to text returned of (display dialog "Enter the width x height:" default answer ((windowWidth & windowHeight) as text)) - -if res is "" then - display dialog "You need to enter a correct response" - return -end if -set {windowWidth, windowHeight} to text items of res - -set AppleScript's text item delimiters to "" - -tell application "Safari" - set screen_width to (do JavaScript "screen.availWidth" in document 1) - set screen_height to (do JavaScript "screen.availHeight" in document 1) -end tell - -tell application "System Events" - set myFrontMost to name of first item of (processes whose frontmost is true) -end tell - -tell application "Finder" - set {desktopTop, desktopLeft, desktopRight, desktopBottom} to bounds of desktop -end tell - -try - tell application "System Events" - tell process myFrontMost - set {{w, h}} to size of drawer of window 1 - end tell - end tell -on error - set {w, h} to {0, 0} -end try - -tell application "System Events" - tell process myFrontMost - try - set {{w, h}} to size of drawer of window 1 - on error - set {w, h} to {0, 0} - end try - set position of window 1 to {((screen_width - windowWidth) / 2), ((screen_height - windowHeight) / 2.0) - desktopTop} - set size of window 1 to {windowWidth -w, windowHeight} - end tell -end tell
\ No newline at end of file |
