On Dec 12, 2011, at 14:37, Rich F wrote:
> Trying to open 3 text windows vertically on a large monitor, with no drawers.
> I was told that the DocD property is the property to set, but not sure how
> this would be done. Getting properties doesn't show anything for this new
> text window for DocD.
______________________________________________________________________
Hey Rich,
You're trying to script this?
You want the script to open new text windows? Or the 3 frontmost existing text
windows?
Uncomment the loop if you want the script to create the windows.
try
tell application "Finder"
set screenBounds to bounds of window of desktop
end tell
set item 2 of screenBounds to 44
set {x1, y1, x2, y2} to screenBounds
set splitScreen to x2 div 3
set winBoundsList to {}
repeat with i from 0 to 2
set end of winBoundsList to {x1 + (i * splitScreen), y1, x1 + ((i + 1) *
splitScreen), y2}
end repeat
tell application "BBEdit"
# repeat with i from 1 to 3
# make new text document
# end repeat
if (count of windows) ≥ 3 then
set winList to name of windows 1 thru 3
set AppleScript's text item delimiters to return
set winList to winList as string
set winList to sort lines winList
set winList to text items of winList
repeat with i from 1 to 3
tell window (item i of winList)
set files visible to false
set bounds to (item i of winBoundsList)
end tell
end repeat
end if
end tell
on error errMsg number errNum
set {cr, sep} to {return, "------------------------------------------"}
set e to sep & cr & "Error: " & errMsg & cr & sep & cr & "Error Number: " &
errNum & cr & sep
beep
display dialog e
end try
--
Best Regards,
Chris
--
You received this message because you are subscribed to the
"BBEdit Talk" discussion group on Google Groups.
To post to this group, send email to [email protected]
To unsubscribe from this group, send email to
[email protected]
For more options, visit this group at
<http://groups.google.com/group/bbedit?hl=en>
If you have a feature request or would like to report a problem,
please email "[email protected]" rather than posting to the group.
Follow @bbedit on Twitter: <http://www.twitter.com/bbedit>
