sys/mac/mmodal.c

   1 /* aNetHack 0.0.1       mmodal.c        $ANH-Date: 1432512797 2015/05/25 00:13:17 $  $ANH-Branch: master $:$ANH-Revision: 1.11 $ */
   2 /* Copyright (c) Jon W{tte, Hao-Yang Wang, Jonathan Handler 1992. */
   3 /* aNetHack may be freely redistributed.  See license for details. */
   4
   5 #if 1 /*!TARGET_API_MAC_CARBON*/
   6 #include <Dialogs.h>
   7 #include <ControlDefinitions.h>
   8 #else
   9 #include <Carbon/Carbon.h>
  10 #endif
  11
  12 #include "macpopup.h"
  13
  14 /* Flash a dialog button when its accelerator key is pressed */
  15 void
  16 FlashButton(DialogRef wind, short item)
  17 {
  18     short type;
  19     Handle handle;
  20     Rect rect;
  21     unsigned long ticks;
  22
  23     /* Apple recommends 8 ticks */
  24     GetDialogItem(wind, item, &type, &handle, &rect);
  25     HiliteControl((ControlHandle) handle, kControlButtonPart);
  26     Delay(8, &ticks);
  27     HiliteControl((ControlHandle) handle, 0);
  28     return;
  29 }