CLR FORM接收窗口消息并处理. SendMessage WndProc RegisterWindowMessage

问题的引入：

我希望在程序中有一个日志输出的窗口。最简单的就是在FORM上放一个LISTVIEW。然后程序各地调用日志输出的时候，在这个LISTVIEW中可以将日志写上去。

就像

LogForm1->WriteLog("系统消息...");

但是...由于感觉Form比较重,因为输出日志的地方很多（可能漫山遍野都输出日志），而且还不是一个工程里，而且还不一定是Form程序。如果要求写日志就要别人include个LogForm1.h什么的也太过分了吧。

就像我有三个工程：

MainUI ：界面展示

DataProc ：数据和业务的处理

msql ：mysql封装

其构建关系和依赖关系是mysql独立，DataProc依赖于mysql, MainUI依赖于DataProc。

出于洁癖的考虑，DataProc没有界面。MainUI中可以放一个输出日志的Form。

显然DataProc再扭过头来use MainUI实在是强人所难。

so，DataProc发送一个WindowsMessage给界面，通过SendMessage让界面展示就好了。

这里边涉及System：：String转换，new一个buffer,然后由接收端收到后展示完free。

CmdbLog::CmdbLog(void *pHwnd,UINT wm_id)
{
	m_MainHwnd = (HWND)pHwnd;
	m_MessageID = wm_id;
}

void CmdbLog::WriteLog(System::String ^ pString,...array<System::Object ^>^pOArray)
{
	pin_ptr<const wchar_t> wch = PtrToStringChars(pString);
	char			*pc;
	int				 ipc;
	System::String ^ o;
	o = System::String::Format(pString,pOArray);

	ipc = wcslen(wch) + 1;
	ipc *= sizeof(wchar_t);
	pc	= new char[ipc];
	memcpy(pc,wch,ipc);

	::SendMessage(m_MainHwnd,m_MessageID,0,(LPARAM)pc);
}

主Form（LogForm中响应这个消息）

	const UINT wm_LogMessageID = ::RegisterWindowMessageA( "LOGEVENT" );

		[SecurityPermission(SecurityAction::Demand, Flags=SecurityPermissionFlag::UnmanagedCode)]
        virtual void WndProc( Message% m ) override   //重载窗口过程处理消息
        {
            if( m.Msg == wm_LogMessageID)
            {
				System::String^ m_sShowMessageString;


				m_sShowMessageString = gcnew System::String((const wchar_t*)(void*)m.LParam);
                MessageBox::Show(m_sShowMessageString); //接收自定义消息 并处理
				AddLogRow(m_sShowMessageString);
				delete [] (char*)(void*)m.LParam;	// 释放这个buffer
            }
            Form::WndProc( m );
        }

	m_vars->InitCmdbLog((void*)this->Handle,wm_LogMessageID);


 
 

  
  
void Form1::AddLogRow(System::String^ pString)
  
  
{
	array<System::String^> ^ pItem = pString->Split(',',':');
	array<System::String^> ^ps = gcnew array<System::String^>(2);
	System::Windows::Forms::ListViewItem^pListViewItem;


	if (pItem->Length > 1)
	{
		ps[0] = pItem[0];
		ps[1] = pString->Substring(pItem[0]->Length + 1,
			pString->Length - pItem[0]->Length -1);
	}
	else
	{
		ps[0] = "缺省";
		ps[1] = pString;
	}
	pListViewItem = gcnew System::Windows::Forms::ListViewItem(ps,-1);
	listView1->BeginUpdate();
	listView1->Items->Add(pListViewItem);
	listView1->EndUpdate();
}