home *** CD-ROM | disk | FTP | other *** search
/ The C Users' Group Library 1994 August / wc-cdrom-cusersgrouplibrary-1994-08.iso / listings / v_08_08 / 8n08107a < prev    next >
Text File  |  1990-07-18  |  338b  |  21 lines
  1. Events and Windows
  2. Richard Rathe MD
  3. Listing 5
  4.  
  5. /*** activate message dispatcher ***/
  6.  
  7. void do_activate(event)
  8. EventRecord event;
  9. {
  10.   WindowPtr window;
  11.   WIND      *windinfo;
  12.   
  13.   window = (WindowPtr)event.message;
  14.   
  15.   windinfo = 
  16.     (WIND *)GetWRefCon(window);
  17.     
  18.   (*windinfo->activateproc)(window,windinfo);
  19. }
  20.  
  21.