home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1999 January / pcwk_01_1999.iso / Wtestowe / Vistdstd / Install / Data.Z / MFC4_vsl.AWX / TEMPLATE / VROOT.CPP < prev    next >
Encoding:
C/C++ Source or Header  |  1997-03-07  |  3.5 KB  |  139 lines
  1. //*****************************************************************************
  2. //    V$$ROOT$$.CPP - Generated by the "MFC VAddon VSL Wizard."
  3. //    Copyright (C) 1997 Visio Corporation. All rights reserved.
  4.  
  5. #include "stdafx.h"
  6.  
  7. #include "v$$root$$.h"        //    Your wizard-generated subclass of VAddon
  8.  
  9.  
  10. //    The name that you give the V$$safe_root$$ in its constructor
  11. //    is the text which shows up in the Visio Tools/Macros menu.
  12. //    _T(" - DEBUG") is automatically appended to the debug version
  13. //    for you by the VAddon class:
  14.  
  15. V$$safe_root$$ g_v$$safe_root$$Addon(_T("$$root$$"));
  16.  
  17.  
  18. //*****************************************************************************
  19.  
  20. //    Constructor and destructor:
  21.  
  22. V$$safe_root$$::V$$safe_root$$(LPCTSTR pName) : 
  23.     VAddon(ATTS, VAO_ENABLEALWAYS, 0, 0, pName)
  24. {
  25.  
  26. }
  27.  
  28. V$$safe_root$$::~V$$safe_root$$()
  29. {
  30.  
  31. }
  32.  
  33.  
  34. //*****************************************************************************
  35.  
  36. //    VAddon Overrides:
  37.  
  38. //    The Run method is pure virtual, with no implementation
  39. //    in the parent class. This method *MUST* be overridden,
  40. //    but it doesn't *HAVE* to do anything. (As you can see below,
  41. //    we're basically just returning VAORC_SUCCESS.)
  42.  
  43. //    The code in Run gets executed when the user chooses the
  44. //    Visio Tools menu item corresponding to your addon. It also
  45. //    gets executed when a shape sheet cell formula RUNADDON or
  46. //    RUNADDONWARGS gets evaluated.
  47.  
  48. VAORC V$$safe_root$$::Run(LPVAOV2LSTRUCT pV2L)
  49. {
  50.     CVisioApplication app;
  51.  
  52.     if (SUCCEEDED(GetApp(app)))
  53.     {
  54.         MessageBeep(MB_OK);
  55.     }
  56.  
  57.     return VAORC_SUCCESS;
  58. }
  59.  
  60.  
  61. //    The rest of the methods call the parent class,
  62. //    which performs default actions.
  63.  
  64. //    IsEnabled, Help and About are yours. The default
  65. //    actions in the parent class are: "Yes, I'm enabled"
  66. //    and a big fat no-op for Help and About.
  67.  
  68. VAORC V$$safe_root$$::IsEnabled(LPVAOV2LSTRUCT pV2L)
  69. {
  70.     return VAddon::IsEnabled(pV2L);
  71. }
  72.  
  73. VAORC V$$safe_root$$::About(LPVAOV2LSTRUCT pV2L)
  74. {
  75.     TCHAR szText[]= _T("$$root$$ Addon generated by MFC VAddon VSL Wizard.\n\nCopyright (c) 1997 by Visio Corporation.\nAll rights reserved.");
  76.     TCHAR szCaption[_MAX_PATH]= _T("About ");
  77.  
  78.     _tcscat(szCaption, GetName());
  79.     MessageBox(GetActiveWindow(), szText, szCaption, MB_OK);
  80.  
  81.     return VAORC_SUCCESS;
  82. }
  83.  
  84. VAORC V$$safe_root$$::Help(LPVAOV2LSTRUCT pV2L)
  85. {
  86.     TCHAR szText[]= _T("Code to jump to $$root$$'s help file is missing.");
  87.     TCHAR szCaption[_MAX_PATH]= _T("");
  88.  
  89.     _tcscpy(szCaption, GetName());
  90.     _tcscat(szCaption, _T(" Help"));
  91.     MessageBox(GetActiveWindow(), szText, szCaption, MB_OK);
  92.  
  93.     return VAORC_SUCCESS;
  94. }
  95.  
  96.  
  97. //    You should always call VAddon::Load, Unload and
  98. //    KillSession and GetInstance or do the things that they
  99. //    do in your methods. See the source in "vaddon.cpp"
  100. //    and "vao.c" for more details.
  101.  
  102. VAORC V$$safe_root$$::Load(WORD wVersion, LPVOID p)
  103. {
  104.     return VAddon::Load(wVersion, p);
  105. }
  106.  
  107. VAORC V$$safe_root$$::Unload(WORD wParam, LPVOID p)
  108. {
  109.     m_app= NULL;
  110.     return VAddon::Unload(wParam, p);
  111. }
  112.  
  113. VAORC V$$safe_root$$::KillSession(LPVAOV2LSTRUCT pV2L)
  114. {
  115.     return VAddon::KillSession(pV2L);
  116. }
  117.  
  118. HINSTANCE V$$safe_root$$::GetInstance(long nFlags /*= 0L*/)
  119. {
  120.     return VAddon::GetInstance(nFlags);
  121. }
  122.  
  123.  
  124. //*****************************************************************************
  125.  
  126. //    V$$safe_root$$ convenience methods:
  127.  
  128. HRESULT V$$safe_root$$::GetApp(CVisioApplication &app)
  129. {
  130.     if (m_app.IsSet() || VAO_SUCCESS==vaoGetObjectWrap(m_app))
  131.     {
  132.         app= m_app;
  133.         return NOERROR;
  134.     }
  135.  
  136.     return E_FAIL;
  137. }
  138.  
  139.