list view
list view
- Subject: list view
- From: email@hidden
- Date: Fri, 13 Apr 2001 07:35:53 -0500
I'd like to add more to the following script: that all open windows
have their view changed to name (or list). Nothing I try seems to
work; can someone help me? Thanks.
Sam
tell application "Finder"
activate
set ls to every window whose popup is false as list
copy the size of the window of the desktop to {c, d}
copy {-14, 22} to {p, q}
repeat with i in ls
if i's name is not "Launcher" then
try
tell i
set the size to {c / 2, d / 2}
set position to {p + 20, q + 20}
copy position of i to {p, q}
set index of i to the (number
of items in ls) - 40
end tell
on error
display dialog "Desktop printer
windows can't be
cascaded at low screen resolution.,
" buttons "Cancel" default button 1 with icon 1
end try
end if
end repeat
end tell