home *** CD-ROM | disk | FTP | other *** search
/ Power-Programmierung / CD1.mdf / magazine / msysjour / vol04 / 01b / macsl / mpmfig6.txt < prev    next >
Text File  |  1988-10-27  |  763b  |  36 lines
  1. LOCAL BOOL MpmMenuLoad( hwndFrame, idResources )
  2.     HWND        hwndFrame;
  3.     USHORT      idResources;
  4. {
  5.     MbarHandle  hmbar;
  6.     MbarPtr     pmbar;
  7.     SHORT       sMenuCount;
  8.     MenuHandle  hmenu;
  9.  
  10.     hmbar = (MbarHandle)GetNewMBar( idResources );
  11.     if( ! hmbar )
  12.       return FALSE;
  13.  
  14.     sMenuCount = MENUCOUNTOFHMBAR( hmbar );
  15.     ASSERT( sMenuCount > 0,
  16.             "MpmMenuLoad: null menu bar?" );
  17.  
  18.     SetMenuBar( hmbar );
  19.     DisposHandle( (Handle)hmbar );
  20.  
  21.     hmbar = (MbarHandle)MenuList;
  22.  
  23.     hmenu = (**hmbar).mlist[0].hmenu;
  24.  
  25.     ASSERT( hmenu,
  26.             "MpmMenuLoad: no apple menu?" );
  27.  
  28.     _sAppleCount = CountMItems( hmenu );
  29.  
  30.     AddResMenu( hmenu, 'DRVR' );
  31.  
  32.     DrawMenuBar();
  33.  
  34.     return TRUE;
  35. }
  36.