David,

This is a two step process.  First, get the handle for the Remote
Workstation.  If your directly connecting into Meditech using our Simple
commands this will be 

hWnd = R.hwnd.  

But, if you are using our Stream Server for the multiple connections so
you'll need to detect each Workstation after it initially loads with:

hWnd = GetForegroundWindow

Second, set its position with:

SetWindowPos hWnd, 0, X, Y, 0, 0, 1

Place the following declarations at the top of your script module:

Private Declare Function GetForegroundWindow Lib "user32" Alias
"GetForegroundWindow" () As Long 

Private Declare Function SetWindowPos Lib "user32" (ByVal hWnd As Long,
ByVal hwndInsertAfter As Long, ByVal x As Long, ByVal y As Long, ByVal
cx As Long, ByVal cy As Long, ByVal wflags As Long) As Long

Good luck, and thanks to Paul Donoughe's son for the code.

Rich McNeil
Boston Software Systems
866 653 5105
www.bostonworkstation.com
 

-----Original Message-----
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Higginson, David
A
Sent: Friday, October 10, 2003 1:19 PM
To: '[EMAIL PROTECTED]'
Subject: [Talk] Multiple script windows

This is probably a dumb question - so bear with me. I have one PC
running
several Meditech Magic scripting routines that fire all the way through
the
day. I have the machine configured so it can open up to 10 concurrent
Meditech sessions, but all the windows overlay each other. Is there
anyway
to a) size the scripting window smaller (I think I can do this in the
emulator) and b) have the scripting window open up in to a specific
location
(so I can tile them).

Thanks in advance,

-David


The information contained in this message may be privileged and
confidential and protected from disclosure. If the reader of this
message is not the intended recipient, or an employee or agent
responsible for delivering this message to the intended recipient, you
are hereby notified that any dissemination, distribution or copying of
this communication is strictly prohibited. If you have received this
communication in error, please notify us immediately by replying to the
message and deleting it from your computer. Thank you. Arkansas
Children's Hospital 




Reply via email to