么意思,消息传递是MFC的基本思想;

解决方案 »

  1.   

    不知道你说的是不是使用MSMQ,消息队列
      

  2.   

    消息传递机制是Windows编程的基石。
      

  3.   

    我没讲清楚。
    以前我看到的是VC++里面用MFC做的消息传递,例如
    AFX_MSG_MAP
       WM_ON_MOUSEMOVE()
    AFX_MSG_MAP
       
    afx void onmousemove(UINT nFlags,CPoint point)
    消息传递的参数是系统定的前几天我看到的是将C#里面用消息传递来传消息
    有两个FORM A和B
    A通过消息传递把输入的数据传给B
    我通常使用Public属性来传递数据的,不知道用消息传递是怎么实现的
      

  4.   

    转贴在实际应用中,我们经常需要多个程序相互配合来完成某些特定功能。例如两个应用程序间的同步、互斥;应用程序在起第二份实例时的参数自动传递…。要实现这些功能,就必须能实现程序间的数据传递。有些特殊的高级技术可在不同的程序间传递数据,如剪贴板、动态数据交换以及 OLE自动化,但有条件限制并且相对较复杂。这里,我介绍三种有效的底层技术,希望对编程爱好者有所帮助。利用 WM_COPYDATA消息 使用该消息涉及一个 TcopyDataStruct结构类型的指针。该结构中有三个成员:dwData 是一个 32位的附加参数cbData 表示要传递的数据区的大小lpData 表示要传递的数据区的指针下面举个例子。该例子由两个程序构成,分别为 SendData和 GetData。SendData程序向 GetData程序发送消息,并传递 edit1中的字符串; GetData在收到消息后,把 SendData发送的字符串接受下来,并显示在相应的 edit1中。SendData程序:……varForm1: TForm1;implementation{$R *.DFM}procedure TForm1.Button1Click(Sender: TObject);vards: TCopyDataStruct;hd: THandle;beginds.cbData := Length (Edit1.Text) + 1;GetMem (ds.lpData, ds.cbData ); //为传递的数据区分配内存StrCopy (ds.lpData, PChar (Edit1.Text));Hd := FindWindow (nil, 'Form2'); // 获得接受窗口的句柄if Hd <> 0 thenSendMessage (Hd, WM_COPYDATA, Handle,Cardinal(@ds)) // 发送 WM_COPYDATA消息elseShowMessage ('目标窗口没找到! ');FreeMem (ds.lpData); //释放资源end;GetData程序: TForm2 = class(TForm)Edit1: TEdit;private{ Private declarations }publicprocedure Mymessage(var t:TWmCopyData);message WM_COPYDATA;{ Public declarations }end;varForm2: TForm2;implementationprocedure TForm2.Mymessage(var t:TWmCopyData);beginEdit1.text:=StrPas(t.CopyDataStruct^.lpData);//接受数据并显示。end;使用这种方法是 WIN32应用程序进行交互的最简单的方法。使用全局原子Win32系统中,为了实现信息共享,系统维护了一张全局原子表。每个原子中存放了一些共享数据。关于对原子的操作,有一组专门的 API函数:GlobalAddAtom 在表中增加全局原子GlobalDeleteAtom 在表中删除全局原子GlobalFindAtom 在表中搜索全局原子GlobalGetAtomName 从表中获取全局原子笔者用这种方法实现了避免程序二次启动,但把第二次启动所带的参数传到第一个实例中以进行相应的处理的程序。基本处理如下:在工程文件中:program Pvdde;usesForms,shellapi,Windows,dialogs,dde in 'dde.pas' {Form1};{$R *.RES}beginif GlobalFindAtom(PChar('PDDE_IS_RUNNING')) = 0 then//避免二次启动beginK:=GlobalAddAtom(PChar('PDDE_IS_RUNNING'));Application.Initialize;Application.CreateForm(TForm1, Form1);Application.Run;endelsebegin//传递二次启动时的参数到第一个实例H := FindWindow(PChar('TForm1'), PChar('资料保密 严禁外传 '));if ParamCount > 0 thenbeginL := GlobalAddAtom(PChar(ParamStr(1)));if H<>0 thenSendMessage(H, WM_MYMESSAGE, 0, L);{ 传递原子句柄 }GlobalDeleteAtom(L); { 使用后释放 }end;Application.Terminate;end;end.在相应的窗口单元 dde.pas增加对自定义消息 WM_MYMESSAGE的处理:procedure TForm1.MyMessage(var T:TMessage);{对 WM_MYMESSAGE消息进行处理 }varP:Array [0..255] of char;beginGlobalGetAtomName(T.LParam, P,255); { 接受数据到 p数组中 }end;使用存储映象文件 这种方法相对较复杂一些。当 Win95与 Winows Nt向内存中装载文件时,使用了特殊的全局内存区。在该区域内,应用程序的虚拟内存地址和文件中的相应位置一一对应。由于所有进程共享了一个用于存储映象文件的全局内存区域,因而当两个进程装载相同模块(应用程序或 DLL文件)时,它们实际可以在内存中共享其执行代码。笔者通过调用一个带有特殊参数的 CreateFileMapping函数,来间接达到程序间共享内存的目的。下面简要解释一下该函数。HANDLE CreateFileMapping(HANDLE hFile, //文件句柄LPSECURITY_ATTRIBUTES lpFileMappingAttributes, // 可选安全属性DWORD flProtect, // 映象文件保护方式DWORD dwMaximumSizeHigh, // 映象文件区域的底值DWORD dwMaximumSizeLow, // 映象文件区域的顶值LPCTSTR lpName // 映象文件的名字);如果 hFile是 0xFFFFFFFF,在调用程序中必须指定 dwMaximumSizeHigh 和 dwMaximumSizeLow参数的值以确定映象文件的大小。通过这样的参数指定,该函数就创建了一个由操作系统页文件支持的特殊逻辑映象文件,而不是由实际操作系统的文件支持的逻辑映象文件。这个逻辑映象文件可以通过复制、继承或者按名字来达到共享。至于其它参数的详细说明,请参看在线帮助。在建立了映象文件之后,我们可以通过调用另外一个 API函数 MapViewOfFile来访问它的内存,该函数会返回一个指向共享内存块的特定指针。LPVOID MapViewOfFile(HANDLE hFileMappingObject, // 映象文件句柄DWORD dwDesiredAccess, // 访问方式DWORD dwFileOffsetHigh, // 映象文件区域的底值DWORD dwFileOffsetLow, // 映象文件区域的顶值DWORD dwNumberOfBytesToMap // 映射字节数);如果 dwNumberOfBytesToMap 是 0,映射整个文件。以下举例说明:privatehMapFile: THandle;MapFilePointer: Pointer;public{ Public declarations }end;varForm1: TForm1;implementation{$R *.DFM}procedure TForm1.FormCreate(Sender: TObject);beginhMapFile := CreateFileMapping ($FFFFFFFF, // 特殊内存映射句柄nil, page_ReadWrite, 0,10000,'DdhDemoMappedFile'); // 文件名if hMapFile <> 0 thenMapFilePointer := MapViewOfFile (hMapFile, // 上面映象文件的句柄File_Map_All_Access,0, 0, 0) // 访问整个映象文件elseShowMessage ('hMapFile = 0');if MapFilePointer = nil thenShowMessage ('MapFilePointer = nil');end; procedure TForm1.BtnWriteClick(Sender: TObject);beginStrCopy (PChar (MapFilePointer),PChar (EditWrite.Text));//把内容写入共享内存end; procedure TForm1.BtnReadClick(Sender: TObject);varS: string;beginS := PChar (MapFilePointer);//从共享内存读出内容EditRead.Text := S;end;用这种方法,不但可以在不同的程序之间共享数据,还可以在同一程序的不同实例间共享数据。为了及时通知其它进程共享数据的变化,可以自定义一条用户消息,通过发消息来实现,这里不再赘述。利用以上三种方法均可以有效地实现数据传递、共享,所有的例子程序均在 Delphi 3.0,4.0下调试通过
      

  5.   

    不好意思,要是有C、C++的代码就好了,Delphi的我没接触过,看着不太习惯
      

  6.   

    如果我在用MFC写一个程序,当窗口收到输入数据后,在CVIEW类里发一个我自己定义的消息WM_MYmessage,我想让CDocument类收到这个消息然后处理,应该怎么做呢?