开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > Windows编程 > 查看源码
OBJONE.CPP
资源名称：MSDN_VC98.zip　[点击查看]
上传用户：bangxh
上传日期：2007-01-31
资源大小：42235k
文件大小：3k
源码类别：

Windows编程

开发平台：

Visual C++

OBJONE.CPP：源码内容
  1. // ObjOne.cpp : implementation file
  2. //
  3. // This is a part of the Active Template Library.
  4. // Copyright (C) 1996-1998 Microsoft Corporation
  5. // All rights reserved.
  6. //
  7. // This source code is only intended as a supplement to the
  8. // Active Template Library Reference and related
  9. // electronic documentation provided with the library.
  10. // See these sources for detailed information regarding the
  11. // Active Template Library product.
  13. #include "premfcat.h"
  14. #include "MfcAtl.h"
  15. #include "ObjOne.h"
  17. #ifdef _DEBUG
  18. #define new DEBUG_NEW
  19. #undef THIS_FILE
  20. static char THIS_FILE[] = __FILE__;
  21. #endif
  23. /////////////////////////////////////////////////////////////////////////////
  24. // CObjectOne
  26. IMPLEMENT_DYNCREATE(CObjectOne, CCmdTarget)
  28. CObjectOne::CObjectOne()
  29. {
  30. EnableAutomation();
  32. // To keep the application running as long as an OLE automation
  33. //  object is active, the constructor calls AfxOleLockApp.
  35. AfxOleLockApp();
  36. }
  38. CObjectOne::~CObjectOne()
  39. {
  40. // To terminate the application when all objects created with
  41. //  with OLE automation, the destructor calls AfxOleUnlockApp.
  43. AfxOleUnlockApp();
  44. }
  47. void CObjectOne::OnFinalRelease()
  48. {
  49. // When the last reference for an automation object is released
  50. // OnFinalRelease is called.  The base class will automatically
  51. // deletes the object.  Add additional cleanup required for your
  52. // object before calling the base class.
  54. CCmdTarget::OnFinalRelease();
  55. }
  58. BEGIN_MESSAGE_MAP(CObjectOne, CCmdTarget)
  59. //{{AFX_MSG_MAP(CObjectOne)
  60. // NOTE - the ClassWizard will add and remove mapping macros here.
  61. //}}AFX_MSG_MAP
  62. END_MESSAGE_MAP()
  64. BEGIN_DISPATCH_MAP(CObjectOne, CCmdTarget)
  65. //{{AFX_DISPATCH_MAP(CObjectOne)
  66. DISP_FUNCTION(CObjectOne, "SayHello", SayHello, VT_BSTR, VTS_NONE)
  67. //}}AFX_DISPATCH_MAP
  68. END_DISPATCH_MAP()
  70. // Note: we add support for IID_IObjectOne to support typesafe binding
  71. //  from VBA.  This IID must match the GUID that is attached to the
  72. //  dispinterface in the .ODL file.
  74. // {5D0CE84F-D909-11CF-91FC-00A0C903976F}
  75. static const IID IID_IObjectOne =
  76. { 0x5d0ce84f, 0xd909, 0x11cf, { 0x91, 0xfc, 0x0, 0xa0, 0xc9, 0x3, 0x97, 0x6f } };
  78. BEGIN_INTERFACE_MAP(CObjectOne, CCmdTarget)
  79. INTERFACE_PART(CObjectOne, IID_IObjectOne, Dispatch)
  80. END_INTERFACE_MAP()
  82. // {5D0CE850-D909-11CF-91FC-00A0C903976F}
  83. IMPLEMENT_OLECREATE(CObjectOne, "MfcAtl.ObjectOne", 0x5d0ce850, 0xd909, 0x11cf, 0x91, 0xfc, 0x0, 0xa0, 0xc9, 0x3, 0x97, 0x6f)
  85. /////////////////////////////////////////////////////////////////////////////
  86. // CObjectOne message handlers
  88. BSTR CObjectOne::SayHello()
  89. {
  90. return SysAllocString(OLESTR("Hello from Object One!"));
  91. }