On May 7, 2008, at 10:01 AM, Jim Krenz wrote:
Hello,
Is there a way to make Safari expand its window to fill the screen (but respect the dock's location) on the monitor it is presently on?
I've found this script that uses the zoom feature, but I want to maximize the Safari window, not just zoom it.
tell application "System Events" to click (first button whose subrole is "AXZoomButton") of (first window whose subrole is "AXStandardWindow") of (first process whose frontmost is true)
Thanks for any help!
Jim
Here's one I use to set the Safari window where I want it.
tell application "Safari"
activate
set rignewBoffset to 180 -- offset to the left for large screen
tell (do shell script "/usr/sbin/system_profiler SPDisplaysDataType | grep Resolution") to set {newR, newB} to {word 2 as number, word 4 as number}
set newT to 22
if newR > 800 then
set newL to 593 - (rignewBoffset)
set newR to newR - (rignewBoffset)
else
set newL to 0
end if
end tell
tell application (path to frontmost application as Unicode text)
-- tell application "System Events"
set front window's bounds to {newL, newT, newR, newB}
end tell