home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #26 / NN_1992_26.iso / spool / comp / lang / lisp / mcl / 1571 < prev    next >
Encoding:
Internet Message Format  |  1992-11-11  |  1.5 KB
  1. Path: sparky!uunet!charon.amdahl.com!pacbell.com!ames!data.nas.nasa.gov!taligent!apple!cambridge.apple.com!alice
  2. From: alice@cambridge.apple.com (Alice Hartley)
  3. Newsgroups: comp.lang.lisp.mcl
  4. Subject: Controlling non-modal dialo
  5. Message-ID: <9211111951.AA29440@cambridge.apple.com>
  6. Date: 11 Nov 92 19:51:59 GMT
  7. References: "Andre Koehorst"'s message of 9 Nov 92 12:23:00 U <9211111836.AA27984@london.riks.nl>
  8. Sender: info-mcl-request@cambridge.apple.com
  9. Lines: 22
  10. Approved: comp.lang.lisp.mcl@Cambridge.Apple.C0M
  11.  
  12.  
  13.    Date: 9 Nov 92 12:23:00 U
  14.    From: "Andre Koehorst" <andre_koehorst@riks.nl>
  15.  
  16.    REGARDING                Controlling non-modal dialogs
  17.    REGARDING                Controlling non-modal dialogs
  18.    For a project we are working on we need to control other appliactions from
  19.    within MCL. One thing we haven't been able to solve is handling NON-modal
  20.    dialogs. One solution that would work for us is some function that could be
  21.    called with a character, corresponding to the first char of the name of a
  22.    dialog-item, eg calling (PRESS-ITEM #/C) to press a button named "Cancel".
  23.    (Note that this function should find the handler to the dialog itself) Has
  24.    anyone done any work to solve this. Anything would be of great help.
  25.    Thanks, 
  26.  
  27. There is an undocumented, unexported subclasss of dialog
  28. ccl::keystroke-action-dialog.
  29.  
  30. view-key-event-handler ((dialog ccl::keystroke-action-dialog) char)
  31. will call (dialog-item-action item) on the first enabled dialog
  32. item in dialog for which the first character of the dialog-item-text
  33. matches char.
  34.