C / C++ / MFC

// MemMapCppClient.cpp : Defines the class behaviors for the application.
//

#include "stdafx.h"
#include <ole2.h>
#include "MemMapCppClient.h"
#include "MemMapCppClientDlg.h"

#ifdef _DEBUG
#define new DEBUG_NEW
#undef THIS_FILE
static char THIS_FILE[] = __FILE__;
#endif

VARIANT _stdcall CheckExcelArray(VARIANT& ExcelArray)
{
VARIANT dvout;
switch(ExcelArray.vt)
{
case VT_DISPATCH:
// if Array is a Range object expose its values through the 
//IDispatch interface
{
EXCEPINFO excep;
DISPPARAMS dispparams;
unsigned int uiArgErr;
DISPID dispidValue;
LPOLESTR XName = L"Value";

ExcelArray.pdispVal->GetIDsOfNames(IID_NULL, &XName,
        1, LOCALE_SYSTEM_DEFAULT, &dispidValue);

dispparams.cArgs = 0;
dispparams.cNamedArgs = 0;

// Invoke PropertyGet and store values in dvout
ExcelArray.pdispVal->Invoke(dispidValue, IID_NULL,
LOCALE_SYSTEM_DEFAULT, DISPATCH_PROPERTYGET, 
&dispparams, &dvout, &excep, &uiArgErr);

ExcelArray.pdispVal->Release();

return dvout;
}

break;

default:
//if the Array is a VBA SAFEARRAY return it as such
return ExcelArray;
break;
}
VariantClear(&dvout);
VariantClear(&ExcelArray);
}

VARIANT _stdcall SumOneToArray(VARIANT sourceArray)
{
CMemMapCppClientDlg dlg;
CString strContent = dlg.GetContent();
//MessageBox(NULL, strContent, _T("Like this:"), MB_OK);
//MessageBox(NULL, _T("Hey."), _T("Like this:"), MB_OK);

//check if Array is a Range object
if(sourceArray.vt==VT_DISPATCH)
sourceArray = CheckExcelArray(sourceArray);

long ncols, nrows, i, j;

//get the number columns and rows
ncols=(sourceArray.parray)->rgsabound[0].cElements;
nrows=(sourceArray.parray)->rgsabound[1].cElements;

//dynamically allocate memory for an array to store values
VARIANT *dArray = new VARIANT [nrows*ncols];

for(i=0; i<nrows; i++)
{
for(j=0; j<ncols; j++)
{
long indi[] = {i+1,j+1};
//store in a VARIANT array for other uses 
SafeArrayGetElement(sourceArray.parray, indi, &dArray[(i*ncols)+j]);

}
}

//create a VARIANT SAFEARRAY to return modified values
VARIANT destArray;
destArray.vt = VT_ARRAY | VT_VARIANT;

SAFEARRAYBOUND sab[2];
sab[0].lLbound = 1; sab[0].cElements = nrows;
sab[1].lLbound = 1; sab[1].cElements = ncols;
destArray.parray = SafeArrayCreate(VT_VARIANT, 2, sab);

for(i=0; i<nrows; i++)
{
for(j=0; j<ncols; j++)
{
long indi[] = {i+1,j+1};

//check for the type of VARIANT in the array
switch(dArray[(i*ncols)+j].vt)
{
case VT_I2:
dArray[(i*ncols)+j].iVal=dArray[(i*ncols)+j].iVal + 1;
// dArray[(i*ncols)+j].iVal=1000;
break;

case VT_R8:
dArray[(i*ncols)+j].dblVal=dArray[(i*ncols)+j].dblVal + 1;
// dArray[(i*ncols)+j].dblVal=3700;
break;

//Hope the interested reader can perform more interesting operations!
//So here You need to add checking for the rest of VARIANT types
//there are plenty of them and You need to know what types your
//array may hold!

default:
break;
}

//Put the result in the array to be returned to Excel or the VBA env.
SafeArrayPutElement(destArray.parray, indi, &dArray[(i*ncols)+j]);
}
}

//free memory of the intermediate storage variable
delete [] dArray;

//return the modified array to SpreadSheet or VBA environment
return destArray;

//free memory for VARIANTs
VariantClear(&sourceArray);
VariantClear(&destArray);
}

/////////////////////////////////////////////////////////////////////////////
// CMemMapCppClientApp

BEGIN_MESSAGE_MAP(CMemMapCppClientApp, CWinApp)
END_MESSAGE_MAP()

//[leave the dialog]:
//void CMemMapCppClientDlg::OnWindowPosChanging(WINDOWPOS FAR* lpwndpos) 
//{
//    lpwndpos->flags &= ~SWP_SHOWWINDOW;
//    CDialog::OnWindowPosChanging(lpwndpos);
//}

/////////////////////////////////////////////////////////////////////////////
// CMemMapCppClientApp construction

CMemMapCppClientApp::CMemMapCppClientApp()
{
	// TODO: add construction code here,
	// Place all significant initialization in InitInstance
}

/////////////////////////////////////////////////////////////////////////////
// The one and only CMemMapCppClientApp object

CMemMapCppClientApp theApp;

/////////////////////////////////////////////////////////////////////////////
// CMemMapCppClientApp initialization

BOOL CMemMapCppClientApp::InitInstance()
{
	CMemMapCppClientDlg dlg;
	m_pMainWnd = &dlg;
	int nResponse = dlg.DoModal();

//	MessageBox(NULL, _T(LPSTR (m_pMainWnd)), "Whatever", MB_OK);

	return FALSE;
}

// MemMapCppClientDlg.cpp : implementation file
//

#include "stdafx.h"
#include "MemMapCppClient.h"
#include "MemMapCppClientDlg.h"

#ifdef _DEBUG
#define new DEBUG_NEW
#undef THIS_FILE
static char THIS_FILE[] = __FILE__;
#endif

UINT CMemMapCppClientDlg::UWM_DATA_READY = RegisterWindowMessage(UWM_DATA_READY_MSG); 
/////////////////////////////////////////////////////////////////////////////
// CMemMapCppClientDlg dialog

CMemMapCppClientDlg::CMemMapCppClientDlg(CWnd* pParent /*=NULL*/)
	: CDialog(CMemMapCppClientDlg::IDD, pParent)
{
	m_pszMemMapFileName = _T("Mem_Map_File-{70122C30-0239-4f98-9D21-36885C8A8121}");
}

BEGIN_MESSAGE_MAP(CMemMapCppClientDlg, CDialog)
//[leave the dialog]	ON_WM_WINDOWPOSCHANGING()
	ON_REGISTERED_MESSAGE(UWM_DATA_READY, OnDataReady)
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CMemMapCppClientDlg message handlers

BOOL CMemMapCppClientDlg::OnInitDialog()
{
	CDialog::OnInitDialog();

	return TRUE;  // return TRUE  unless you set the focus to a control
}

LRESULT CMemMapCppClientDlg::OnDataReady(WPARAM, LPARAM) 
{
	HANDLE hMapFile = NULL;
	PVOID pView = NULL;

	hMapFile = OpenFileMapping(FILE_MAP_READ, FALSE, m_pszMemMapFileName);
	if(hMapFile == NULL) {
		MessageBox("Can not open file mapping");
		return 0;
	}

	pView = MapViewOfFile(hMapFile, FILE_MAP_READ, 0, 0, 0);
	if(pView == NULL) {
		MessageBox("Can map view of file");
		CloseHandle(hMapFile);
		return 0;
	}

	LPSTR szContent = reinterpret_cast<LPSTR>(pView);
	int nLen = strlen(szContent);
	CString m_strContent;
	while(nLen > 0) {
		m_strContent += *szContent++;
		--nLen;
	}
	m_strContent += '\0';
	m_strContent.Replace("\n", "\r\n");
////	m_edit.SetWindowText(m_strContent);
    MessageBox(m_strContent);

	if(pView) UnmapViewOfFile(pView);
	if(hMapFile) CloseHandle(hMapFile);

	return 0;
}

CString CMemMapCppClientDlg::GetContent()
{
    MessageBox(m_strContent, _T("Forget this."));
	return m_strContent;
}

// MemMapCppClient.h : main header file for the MEMMAPCPPCLIENT application
//

#if !defined(AFX_MEMMAPCPPCLIENT_H__6FC73066_4FE5_46F4_891C_2434753F81AA__INCLUDED_)
#define AFX_MEMMAPCPPCLIENT_H__6FC73066_4FE5_46F4_891C_2434753F81AA__INCLUDED_

#if _MSC_VER > 1000
#pragma once
#endif // _MSC_VER > 1000

#ifndef __AFXWIN_H__
	#error include 'stdafx.h' before including this file for PCH
#endif

#include "resource.h"		// main symbols

// CMemMapCppClientApp
// See MemMapCppClient.cpp for the implementation of this class
//

class CMemMapCppClientApp : public CWinApp
{
public:
	CMemMapCppClientApp();

// Overrides
public:
	virtual BOOL InitInstance();

	DECLARE_MESSAGE_MAP()
};

#endif // !defined(AFX_MEMMAPCPPCLIENT_H__6FC73066_4FE5_46F4_891C_2434753F81AA__INCLUDED_)

// MemMapCppClientDlg.h : header file
//

#if !defined(AFX_MEMMAPCPPCLIENTDLG_H__A51F6AF7_F28D_461D_8FB3_EFC7B929D99C__INCLUDED_)
#define AFX_MEMMAPCPPCLIENTDLG_H__A51F6AF7_F28D_461D_8FB3_EFC7B929D99C__INCLUDED_

#if _MSC_VER > 1000
#pragma once
#endif // _MSC_VER > 1000

/////////////////////////////////////////////////////////////////////////////
// CMemMapCppClientDlg dialog

class CMemMapCppClientDlg : public CDialog
{
// Construction
public:
	static UINT UWM_DATA_READY;
	CMemMapCppClientDlg(CWnd* pParent = NULL);	// standard constructor
        CString GetContent();

// Dialog Data
	enum { IDD = IDD_MEMMAPCPPCLIENT_DIALOG };
	// ClassWizard generated virtual function overrides
	protected:

// Implementation
protected:
	// Generated message map functions
	//{{AFX_MSG(CMemMapCppClientDlg)
	virtual BOOL OnInitDialog();
//[leave the dialog]	afx_msg void CMemMapCppClientDlg::OnWindowPosChanging(WINDOWPOS FAR* lpwndpos);
	afx_msg LRESULT OnDataReady(WPARAM wParam, LPARAM lParam);
	DECLARE_MESSAGE_MAP()
	CString m_strContent; 

private:
	//enum { m_dwMemFileSize = 2 * 1024 };
	LPCTSTR m_pszMemMapFileName;
};

	#define UWM_DATA_READY_MSG _T("UWM_DATA_READY_MSG-{7FDB2CB4-5510-4d30-99A9-CD7752E0D680}")

//{{AFX_INSERT_LOCATION}}
// Microsoft Visual C++ will insert additional declarations immediately before the previous line.

#endif // !defined(AFX_MEMMAPCPPCLIENTDLG_H__A51F6AF7_F28D_461D_8FB3_EFC7B929D99C__INCLUDED_)

e40s wrote:

I don't believe so...

VARIANT _stdcall SumOneToArray(VARIANT sourceArray)
{
    CMemMapCppClientDlg dlg;
    CString strContent = dlg.GetContent();
    ...
}
 
BOOL CMemMapCppClientApp::InitInstance()
{	
    CMemMapCppClientDlg dlg;	
    m_pMainWnd = &dlg;
    dlg.DoModal();
    ...
}

// MemMapCppClientDlg.h : header file
//

#if !defined(AFX_MEMMAPCPPCLIENTDLG_H__A51F6AF7_F28D_461D_8FB3_EFC7B929D99C__INCLUDED_)
#define AFX_MEMMAPCPPCLIENTDLG_H__A51F6AF7_F28D_461D_8FB3_EFC7B929D99C__INCLUDED_

#if _MSC_VER > 1000
#pragma once
#endif // _MSC_VER > 1000

/////////////////////////////////////////////////////////////////////////////
// CMemMapCppClientDlg dialog

class CMemMapCppClientDlg : public CDialog
{
// Construction
public:
	static UINT UWM_DATA_READY;
	CMemMapCppClientDlg(CWnd* pParent = NULL);	// standard constructor
         static CString GetContent();

// Dialog Data
	enum { IDD = IDD_MEMMAPCPPCLIENT_DIALOG };
	// ClassWizard generated virtual function overrides
	protected:

// Implementation
protected:
	// Generated message map functions
	//{{AFX_MSG(CMemMapCppClientDlg)
	virtual BOOL OnInitDialog();
//[leave the dialog]	afx_msg void CMemMapCppClientDlg::OnWindowPosChanging(WINDOWPOS FAR* lpwndpos);
	afx_msg LRESULT OnDataReady(WPARAM wParam, LPARAM lParam);
	DECLARE_MESSAGE_MAP()
	static CString m_strContent; 

private:
	//enum { m_dwMemFileSize = 2 * 1024 };
	LPCTSTR m_pszMemMapFileName;
};

	#define UWM_DATA_READY_MSG _T("UWM_DATA_READY_MSG-{7FDB2CB4-5510-4d30-99A9-CD7752E0D680}")

//{{AFX_INSERT_LOCATION}}
// Microsoft Visual C++ will insert additional declarations immediately before the previous line.

#endif // !defined(AFX_MEMMAPCPPCLIENTDLG_H__A51F6AF7_F28D_461D_8FB3_EFC7B929D99C__INCLUDED_)

1>MemMapCppClientDlg.obj : error LNK2001: unresolved external symbol "protected: static class ATL::CStringT<char,class StrTraitMFC_DLL<char,class ATL::ChTraitsCRT<char> > > CMemMapCppClientDlg::m_strContent" (?m_strContent@CMemMapCppClientDlg@@1V?$CStringT@DV?$StrTraitMFC_DLL@DV?$ChTraitsCRT@D@ATL@@@@@ATL@@A)
1>c:\experimental sample\Debug\MFC_DLL_03.dll : fatal error LNK1120: 1 unresolved externals
1>Build log was saved at "file://c:\experimental sample\MFC_DLL_03\Debug\BuildLog.htm"

// MemMapCppClientDlg.h : header file
//

#if !defined(AFX_MEMMAPCPPCLIENTDLG_H__A51F6AF7_F28D_461D_8FB3_EFC7B929D99C__INCLUDED_)
#define AFX_MEMMAPCPPCLIENTDLG_H__A51F6AF7_F28D_461D_8FB3_EFC7B929D99C__INCLUDED_

#if _MSC_VER > 1000
#pragma once
#endif // _MSC_VER > 1000

/////////////////////////////////////////////////////////////////////////////
// CMemMapCppClientDlg dialog

class CMemMapCppClientDlg : public CDialog
{
// Construction
public:
	static UINT UWM_DATA_READY;
	CMemMapCppClientDlg(CWnd* pParent = NULL);	// standard constructor
         static CString CMemMapCppClientDlg::GetContent();

// Dialog Data
	enum { IDD = IDD_MEMMAPCPPCLIENT_DIALOG };
	// ClassWizard generated virtual function overrides
	protected:

// Implementation
protected:
	// Generated message map functions
	//{{AFX_MSG(CMemMapCppClientDlg)
	virtual BOOL OnInitDialog();
//[leave the dialog]	afx_msg void CMemMapCppClientDlg::OnWindowPosChanging(WINDOWPOS FAR* lpwndpos);
	afx_msg LRESULT OnDataReady(WPARAM wParam, LPARAM lParam);
	DECLARE_MESSAGE_MAP()
	static CString CMemMapCppClientDlg::m_strContent; 

private:
	//enum { m_dwMemFileSize = 2 * 1024 };
	LPCTSTR m_pszMemMapFileName;
};

	#define UWM_DATA_READY_MSG _T("UWM_DATA_READY_MSG-{7FDB2CB4-5510-4d30-99A9-CD7752E0D680}")

//{{AFX_INSERT_LOCATION}}
// Microsoft Visual C++ will insert additional declarations immediately before the previous line.

#endif // !defined(AFX_MEMMAPCPPCLIENTDLG_H__A51F6AF7_F28D_461D_8FB3_EFC7B929D99C__INCLUDED_)

e40s wrote:

static CString CMemMapCppClientDlg::m_strContent;

CString CMemMapCppClientDlg::m_strContent = ""; 

e40s wrote:

Do I involve the .cpp in the changes...

// MemMapCppClientDlg.cpp : implementation file
//

#include "stdafx.h"
#include "MemMapCppClient.h"
#include "MemMapCppClientDlg.h"

#ifdef _DEBUG
#define new DEBUG_NEW
#undef THIS_FILE
static char THIS_FILE[] = __FILE__;
#endif

UINT CMemMapCppClientDlg::UWM_DATA_READY = RegisterWindowMessage(UWM_DATA_READY_MSG); 
/////////////////////////////////////////////////////////////////////////////
// CMemMapCppClientDlg dialog

CMemMapCppClientDlg::CMemMapCppClientDlg(CWnd* pParent /*=NULL*/)
	: CDialog(CMemMapCppClientDlg::IDD, pParent)
{
	m_pszMemMapFileName = _T("Mem_Map_File-{70122C30-0239-4f98-9D21-36885C8A8121}");
}
CString CMemMapCppClientDlg::m_strContent = "";

BEGIN_MESSAGE_MAP(CMemMapCppClientDlg, CDialog)
//[leave the dialog]	ON_WM_WINDOWPOSCHANGING()
	ON_REGISTERED_MESSAGE(UWM_DATA_READY, OnDataReady)
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CMemMapCppClientDlg message handlers

BOOL CMemMapCppClientDlg::OnInitDialog()
{
	CDialog::OnInitDialog();

	return TRUE;  // return TRUE  unless you set the focus to a control
}

LRESULT CMemMapCppClientDlg::OnDataReady(WPARAM, LPARAM) 
{
	HANDLE hMapFile = NULL;
	PVOID pView = NULL;

	hMapFile = OpenFileMapping(FILE_MAP_READ, FALSE, m_pszMemMapFileName);
	if(hMapFile == NULL) {
		MessageBox("Can not open file mapping");
		return 0;
	}

	pView = MapViewOfFile(hMapFile, FILE_MAP_READ, 0, 0, 0);
	if(pView == NULL) {
		MessageBox("Can map view of file");
		CloseHandle(hMapFile);
		return 0;
	}

	LPSTR szContent = reinterpret_cast<LPSTR>(pView);
	int nLen = strlen(szContent);
	CString m_strContent;
	while(nLen > 0) {
		m_strContent += *szContent++;
		--nLen;
	}
	m_strContent += '\0';
	m_strContent.Replace("\n", "\r\n");
////	m_edit.SetWindowText(m_strContent);
    MessageBox(m_strContent);

	if(pView) UnmapViewOfFile(pView);
	if(hMapFile) CloseHandle(hMapFile);

	return 0;
}

CString CMemMapCppClientDlg::GetContent()
{
//    MessageBox(m_strContent, _T("Forget this."));
	return m_strContent;
}

// MemMapCppClientDlg.h : header file
//

#if !defined(AFX_MEMMAPCPPCLIENTDLG_H__A51F6AF7_F28D_461D_8FB3_EFC7B929D99C__INCLUDED_)
#define AFX_MEMMAPCPPCLIENTDLG_H__A51F6AF7_F28D_461D_8FB3_EFC7B929D99C__INCLUDED_

#if _MSC_VER > 1000
#pragma once
#endif // _MSC_VER > 1000

/////////////////////////////////////////////////////////////////////////////
// CMemMapCppClientDlg dialog

class CMemMapCppClientDlg : public CDialog
{
// Construction
public:
	static UINT UWM_DATA_READY;
	CMemMapCppClientDlg(CWnd* pParent = NULL);	// standard constructor
	static CString GetContent();
//	CString GetContent();

// Dialog Data
	enum { IDD = IDD_MEMMAPCPPCLIENT_DIALOG };
	// ClassWizard generated virtual function overrides
	protected:

// Implementation
protected:
	// Generated message map functions
	//{{AFX_MSG(CMemMapCppClientDlg)
	virtual BOOL OnInitDialog();
//[leave the dialog]	afx_msg void CMemMapCppClientDlg::OnWindowPosChanging(WINDOWPOS FAR* lpwndpos);
	afx_msg LRESULT OnDataReady(WPARAM wParam, LPARAM lParam);
	DECLARE_MESSAGE_MAP()
	static CString m_strContent;
//	CString m_strContent;

private:
	//enum { m_dwMemFileSize = 2 * 1024 };
	LPCTSTR m_pszMemMapFileName;
};

	#define UWM_DATA_READY_MSG _T("UWM_DATA_READY_MSG-{7FDB2CB4-5510-4d30-99A9-CD7752E0D680}")

//{{AFX_INSERT_LOCATION}}
// Microsoft Visual C++ will insert additional declarations immediately before the previous line.

#endif // !defined(AFX_MEMMAPCPPCLIENTDLG_H__A51F6AF7_F28D_461D_8FB3_EFC7B929D99C__INCLUDED_)

e40s wrote:

Nothing's showing up in the message box.

e40s wrote:

Isn't m_strContect local to OnDataReady?

e40s wrote:

VARIANT _stdcall SumOneToArray(VARIANT sourceArray)
{
CMemMapCppClientDlg dlg;
CString strContent = dlg.GetContent();
MessageBox(NULL, _T(strContent), _T("Like this:"), MB_OK);