From:
<Fra...@im...> - 2003-08-26 16:03:00
|
Joachim, I looks like you have your answer with the=20 "System Events" application. But just in case you=20 need control at a lower level, there is an API=20 for generating low level events on OS X, it is=20 the file "CGRemoteOperation.h" /System/Library/Frameworks/ApplicationServices.framework/Frameworks/CoreGrap= hics.framework/Headers/CGRemoteOperation.h http://developer.apple.com/documentation/GraphicsImaging/Reference/Quartz_Se= rvices_Ref/qsref_main/function_group_10.html In particular, the functions "CGPostMouseEvent"=20 and "CGPostKeyboardEvent" do exactly this: post=20 low-level events on the local machine. Of course,=20 you'd have to wrap this into some tcl-wrapper if=20 you'd like to invoke them from tcl... Fran=E7ois At 22:36 +0200 22/08/03, Joachim Kock wrote: >Hello TclAE experts, > >is there a way (from within Tcl) to post mouse clicks to the event >queue? (Preferably under OSX, but if for some reason it is easier in >OS9 I am also very interested in this.) Some GUI programmes haven't >got any command line interface and don't understand AppleScript, so >in order to control them from within Tcl Tcl needs a 'mouse'... >--- use Tcl as a robot to operate the graphical programme... >Something like > > bringToFront someGraphicalApp > wait 200 ticks > sendMouseClick 223 356 > # the coordinates of the click... > wait 200 ticks > sendMouseClick 620 445 > # e.g. click on the Save button, and next > # read in that file from the Tcl script, etc. > >Under OS9 there are several 'macro programmes' capable of posting >such click events, as well as menuItemSelection events, etc. --- >e.g. KeyQuencer --- but these programmes are also just isolated >creatures you can't really control from outside, and they haven't >got enough language themselves to write anything serious... > >Thanks a lot in advance for any help, hints, or explanations. > >Joachim. > > >------------------------------------------------------- >This SF.net email is sponsored by: VM Ware >With VMware you can run multiple operating systems on a single machine. >WITHOUT REBOOTING! Mix Linux / Windows / Novell virtual machines >at the same time. Free trial click here:http://www.vmware.com/wl/offer/358/= 0 >_______________________________________________ >Tcl-mac mailing list >Tc...@li... >https://lists.sourceforge.net/lists/listinfo/tcl-mac |