how to make/move a new window underneath the other windows
how to make/move a new window underneath the other windows
- Subject: how to make/move a new window underneath the other windows
- From: Kim Holburn <email@hidden>
- Date: Thu, 18 Nov 2004 11:17:42 +1100
Hi,
I have a script that creates a window (it's a Mail.app rule script) so
it uses a command from the Mail.app library:
--------------------------------------------
set theWindow to make new message viewer with properties {visible:true}
--------------------------------------------
Now the window appears at the top of all windows, which is I assume the
end of the list of (all or just Mail.app?) windows.
How can I put it underneath other Mail.app windows? (at the start of
the windows?)
I have tried various things, I have tried to raise other windows
(although this would automatically bring Mail.app to the front which is
not what I want).
I have tried :
--------------------------------------------
set theWindow to make new message viewer at beginning of windows with
properties {visible:true}
--------------------------------------------
set theWindow to make new message viewer with properties {visible:true}
set myindex to index of theWindow
move window myindex of the windows to beginning of the windows
---------------------
move window index of theWindow of the windows to beginning of the
windows
---------------------
move window theWindow of the windows to beginning of the windows
move window theWindow to beginning of the windows
--------------------------------------------
try
set mymainwindow to MainWindow
end try
set theWindow to make new message viewer with properties {visible:true}
try
tell mymainwindow
raise
end tell
end try
--------------------------------------------
(MainWindow and Raise came from examining Mail.app with the
UIElementInspector I haven't seen either MainWindow nor Raise in any
other documentation -- for instance it doesn't show up in the Mail.app
dictionary)
Any help gratefully appreciated.
Kim
--
Kim Holburn
IT Manager, Canberra Research Laboratory
National Information and Communication Technology Australia
Ph: +61 2 61258620 M: +61 417820641
Email: email@hidden - PGP Public Key on request
Cacert Root Cert: http://www.cacert.org/index.php?id=16 ->
http://www.cacert.org/cacert.crt
Aust. Spam Act: To stop receiving mail from me: reply and let me know.
Use ISO 8601 dates [YYYY-MM-DD]
http://www.saqqara.demon.co.uk/datefmt.htm
Democracy imposed from without is the severest form of tyranny.
-- Lloyd Biggle, Jr. Analog, Apr 1961
_______________________________________________
Do not post admin requests to the list. They will be ignored.
Applescript-users mailing list (email@hidden)
Help/Unsubscribe/Update your Subscription:
This email sent to email@hidden