home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #26 / NN_1992_26.iso / spool / comp / lang / lisp / mcl / 1569 < prev    next >
Encoding:
Internet Message Format  |  1992-11-11  |  1.6 KB

  1. Path: sparky!uunet!decwrl!netsys!agate!apple!apple!cambridge.apple.com!straz@cambridge.apple.com
  2. From: straz@cambridge.apple.com (Steve Strassmann)
  3. Newsgroups: comp.lang.lisp.mcl
  4. Subject: Controlling non-modal dialo
  5. Message-ID: <9211111858.AA28596@cambridge.apple.com>
  6. Date: 11 Nov 92 18:59:18 GMT
  7. Sender: info-mcl-request@cambridge.apple.com
  8. Lines: 26
  9. Approved: comp.lang.lisp.mcl@Cambridge.Apple.C0M
  10. Full-Name: Steve Strassmann
  11. Original-To: andre@riks.nl
  12. Original-Cc: info-mcl
  13.  
  14. >Date: 9 Nov 92 12:23:00 U
  15. >From: "Andre Koehorst" <andre_koehorst@riks.nl>
  16. >Subject: Controlling non-modal dialo
  17. >To: info-mcl@cambridge.apple.com
  18. >
  19. >REGARDING                Controlling non-modal dialogs
  20. >For a project we are working on we need to control other appliactions from
  21. >within MCL. One thing we haven't been able to solve is handling NON-modal
  22. >dialogs. One solution that would work for us is some function that could be
  23. >called with a character, corresponding to the first char of the name of a
  24. >dialog-item, eg calling (PRESS-ITEM #/C) to press a button named "Cancel".
  25. >(Note that this function should find the handler to the dialog itself) Has
  26. >anyone done any work to solve this. Anything would be of great help.
  27. >Thanks, 
  28. >
  29. >Andre Koehorst
  30. >Research Institute for Knowledge Systems
  31. >Maastricht (the best known totally insignificant town of the world)
  32. >The Netherlands
  33. >email: andre@riks.nl
  34.  
  35. There might be a way to do this cleanly from MCL, but one trick that
  36. comes to mind is to use the popular utility QuicKeys, from CE Software.
  37.  
  38. You can have MCL send an AppleEvent to QuicKeys, and then QuicKeys can
  39. execute any mouse or keyboard event in the slaved application.
  40.