home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #31 / NN_1992_31.iso / spool / comp / sys / mac / programm / 20137 < prev    next >
Encoding:
Text File  |  1992-12-21  |  1.5 KB  |  43 lines
  1. Newsgroups: comp.sys.mac.programmer
  2. Path: sparky!uunet!caen!nic.umass.edu!titan.ucc.umass.edu!rjr
  3. From: rjr@titan.ucc.umass.edu (Richard J. Resnick)
  4. Subject: Re: Beginner's Hierarchical Menu Problem
  5. Message-ID: <BzLz4t.99u@nic.umass.edu>
  6. Sender: usenet@nic.umass.edu (USENET News System)
  7. Organization: University of Massachusetts, Amherst
  8. References: <BzKItx.qs@nic.umass.edu> <BzLL5E.Btp@cantua.canterbury.ac.nz>
  9. Date: Mon, 21 Dec 1992 12:10:05 GMT
  10. Lines: 31
  11.  
  12. Hello again, I am the original poster of this problem. Here is the
  13. code again, to refresh anyone's memory who cares to be refreshed:
  14.  
  15.  
  16.  (*Loads up the Desk Accesories in the Apple Menu*)
  17.    aMenu := GetMHandle(APPLE_MENU_ID);
  18.    AddResMenu(aMenu, 'DRVR');
  19.  
  20.  (*Tries to load up the Fonts in the FONT_MENU*)
  21.    aMenu := GetMHandle(FONT_MENU_ID);
  22.    InsertMenu(aMenu, -1);
  23.    AddResMenu(aMenu, 'FONT');
  24.  
  25.  The error that I get when I run this under Think Pascal is "Think
  26.  Pascal unexpectedly quit", and when I build the application and run
  27.  it, I get a missing coprocessor error.
  28.  
  29.  I'v tried to change the number of the FONT resource to > 128, and
  30. that didn't help. I tried to trace the problem, and it dies right at
  31. AddResMenu(aMenu, 'FONT').
  32.  
  33.  Could this problem stem off of the fact that my mac can't find the
  34. FONTs? I don't have a suitcase, it is all stored in the System. Any
  35. ideas you all might have would be greatly appreciated.
  36.  
  37.  Oh yeah, in case this is your first time reading about this, I am
  38. using a Classic 4/40, no additional features of any sort whatsoever.
  39.  
  40. Thanks in advance.
  41.  
  42. Richard Resnick
  43.