home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / tolkit45.zip / os2tk45 / som / include / tclong.idl < prev    next >
Text File  |  1999-02-22  |  2KB  |  89 lines
  1. //#  @(#) 2.10 src/somuc/tclong.idl, somuc, som2.1 12/26/95 15:35:13 [7/30/96 14:50:02]
  2. //
  3. //   COMPONENT_NAME: somuc
  4. //
  5. //   ORIGINS: 82, 81, 27
  6. //
  7. //
  8. //    25H7912  (C)  COPYRIGHT International Business Machines Corp. 1992,1996,1996  
  9. //   All Rights Reserved
  10. //   Licensed Materials - Property of IBM
  11. //   US Government Users Restricted Rights - Use, duplication or
  12. //   disclosure restricted by GSA ADP Schedule Contract with IBM Corp.
  13. //
  14. //   Copyright ⌐ 1988, 1989 Apple Computer, Inc. All rights reserved.
  15.  
  16. /*
  17.  * CLASS_NAME: somf_TCollectibleLong
  18.  *
  19.  * DESCRIPTION: This class provides the user with a generic MCollectible
  20.  *              containing a long value.
  21.  *
  22.  */
  23.  
  24. #ifndef TCLong_idl
  25. #define TCLong_idl
  26.  
  27. #include "mcollect.idl"
  28.  
  29. interface somf_TCollectibleLong : somf_MCollectible
  30. {
  31.   somf_TCollectibleLong somfTCollectibleLongInit(in long v);
  32.  
  33.   // Initializes the new set.
  34.   //# TCollectibleLong(long v);
  35.  
  36.  
  37.   long somfGetValue();
  38.  
  39.   // Determine the value of the long.
  40.   //# long GetValue();
  41.  
  42.  
  43.   void somfSetValue(in long v);
  44.  
  45.   // Set the value of the long in the TCollectibleLong
  46.   //# void SetValue(long v);
  47.  
  48.   //# operator long is not ported since when you turn it into a method
  49.   //# it is the same as GetValue.
  50.   //# operator long();
  51.  
  52.   //# virtual TStream& operator>>=(TStream& towhere) const;
  53.   //# virtual TStream& operator<<=(TStream& towhere);
  54.  
  55.   //#override somfClone;
  56.   //# There is no point in overriding somfClone, the code was fixed so it works
  57.   //# correctly.
  58.   //# MCollectibleDeclarationsMacro(TCollectibleLong);
  59.  
  60.  
  61. #ifdef __SOMIDL__
  62.   implementation {
  63.  
  64.     releaseorder: somfGetValue,somfSetValue,somfTCollectibleLongInit;
  65.  
  66.     //# Class Modifiers
  67.     majorversion = 2;
  68.     minorversion = 1;
  69.     filestem = tclong;
  70.     dllname = "somuc.dll";
  71.  
  72.  
  73.     //# Internal Instance Variables
  74.     long fvalue;
  75.  
  76.     //# Method Modifiers
  77.     somInit: override;
  78.     somfIsEqual: override;
  79.     somfHash: override;
  80.     somfTCollectibleLongInit: nooverride;
  81.  
  82.     //# Data Modifiers
  83.  
  84.   };
  85. #endif /* __SOMIDL__ */
  86. };
  87.  
  88. #endif  /* TCLong_idl */
  89.