home *** CD-ROM | disk | FTP | other *** search
/ Tricks of the Windows Gam…ming Gurus (2nd Edition) / Disc2.iso / msdn_vcb / samples / vc98 / sdk / com / inole2 / chap16 / beeper6 / beep0000.odl next >
Text File  |  1995-05-03  |  2KB  |  79 lines
  1. /*
  2.  * BEEP0000.ODL
  3.  * Neutral/English Language Beeper Type Library Chapter 16
  4.  *
  5.  * "Neutral" language is considered to be English.  We register
  6.  * this under LCID of 0 so the lcid before "library" has to match.
  7.  *
  8.  * Copyright (c)1993-1995 Microsoft Corporation, All Rights Reserved
  9.  *
  10.  * Kraig Brockschmidt, Microsoft
  11.  * Internet  :  kraigb@microsoft.com
  12.  * Compuserve:  >INTERNET:kraigb@microsoft.com
  13.  */
  14.  
  15. //LIBID_Beeper
  16. [
  17. uuid(0002115E-0000-0000-C000-000000000046)
  18.     , helpstring("Beeper Type Library")
  19.     , lcid(0x0000)
  20.     , version(1.0)
  21. ]
  22. library BeeperTypeLibrary
  23.     {
  24.    #ifdef WIN32
  25.     importlib("STDOLE32.TLB");
  26.    #else
  27.     importlib("STDOLE.TLB");
  28.    #endif
  29.  
  30.     /*
  31.      * IID_IBeeper
  32.      * 'interface' entries must have 'odl' attribute
  33.      */
  34.     [
  35.     uuid(0002115C-0000-0000-C000-000000000046)
  36.         , helpstring("Definition of interface IBeeper")
  37.         , odl
  38.     ]
  39.     interface IBeeper : IUnknown
  40.         {
  41.         //Properties
  42.         [propget, helpstring("The current sound")
  43.             , bindable, defaultbind, displaybind, requestedit
  44.         ]
  45.             long Sound(void);
  46.  
  47.         [propput
  48.             , bindable, defaultbind, displaybind, requestedit
  49.         ]
  50.             void Sound([in] long lSound);
  51.  
  52.         //Methods
  53.         [helpstring("Play the current sound")]
  54.             long Beep(void);
  55.         }
  56.  
  57.     //DIID_DIBeeper
  58.     [
  59.     uuid(0002115D-0000-0000-C000-000000000046)
  60.         , helpstring("Definition of dispinterface DIBeeper")
  61.     ]
  62.     dispinterface DIBeeper
  63.         {
  64.         interface IBeeper;
  65.         }
  66.  
  67.  
  68.     //CLSID_Beeper
  69.     [
  70.     uuid(0002115B-0000-0000-C000-000000000046)
  71.         , helpstring("Beeper Object Type Information")
  72.     ]
  73.     coclass Beeper
  74.         {
  75.         dispinterface DIBeeper;
  76.         interface     IBeeper;
  77.         }
  78.     };
  79.