home *** CD-ROM | disk | FTP | other *** search
/ The Datafile PD-CD 2 / DATAFILE_PDCD2.iso / utilities2 / desklib / Libraries / Window / c / Help < prev    next >
Encoding:
Text File  |  1993-04-30  |  1.9 KB  |  55 lines
  1. /*
  2.     ####             #    #     # #
  3.     #   #            #    #       #          The FreeWare C library for 
  4.     #   #  ##   ###  #  # #     # ###             RISC OS machines
  5.     #   # #  # #     # #  #     # #  #   ___________________________________
  6.     #   # ####  ###  ##   #     # #  #                                      
  7.     #   # #        # # #  #     # #  #    Please refer to the accompanying
  8.     ####   ### ####  #  # ##### # ###    documentation for conditions of use
  9.     ________________________________________________________________________
  10.  
  11.     File:    Window.Help.c
  12.     Author:  Copyright © 1992 Jason Williams
  13.     Version: 1.00 (09 Apr 1992)
  14.     Purpose: Adds an event handler that replies to HelpRequest messages
  15.              by taking the window's template name and icon number, and
  16.              looking up (e.g. "template.1") in the Msgs file.
  17. */
  18.  
  19. #include "Event.h"
  20. #include "Window.h"
  21. #include "Msgs.h"
  22. #include "WimpSWIs.h"
  23.  
  24. #include <stdio.h>
  25. #include "string.h"
  26.  
  27.  
  28.  
  29. extern BOOL Window_HelpHandler(event_pollblock *event, void *reference)
  30. {
  31.   char template[16], number[16];
  32.   message_destinee replyto;
  33.  
  34.   if (event->data.message.header.action == message_HELPREQUEST)
  35.   {
  36.     Window_ParentName(event->data.message.data.helprequest.where.window,
  37.                       template);
  38.     template[8] = '\0';         /* tags can't be more than 8 characters long */
  39.  
  40.     sprintf(number, ".%d", event->data.message.data.helprequest.where.icon);
  41.     strcat(template, number);
  42.  
  43.     if (Msgs_Lookup(template, event->data.message.data.helpreply.text, 200))
  44.     {
  45.       event->data.message.header.yourref = event->data.message.header.myref;
  46.       event->data.message.header.action = message_HELPREPLY;
  47.       event->data.message.header.size = 256;
  48.       replyto = event->data.message.header.sender;
  49.       Wimp_SendMessage(18, &event->data.message, replyto, 0);
  50.       return(TRUE);  /* Only claim message event if successfully reply to it */
  51.     }
  52.   }
  53.   return(FALSE);
  54. }
  55.