窗口之间发送消息

;接收端 .386 .model flat,stdcall option casemap:none include windows.inc include gdi32.inc includelib gdi32.lib include user32.inc includelib user32.lib include kernel32.inc includelib kernel32.lib .data? hInstance dd ? hWinMain dd ? .data szReceive db 'Receive WM_SETTEXT message',0dh,0ah db 'param: %08x',0dh,0ah db 'text: "%s"',0dh,0ah,0 szBuffer db 200 dup(0) .const szClassName db 'MyClass',0 szCaptionMain db 'Receive Message',0 szText db 'Win32 Assembly, Simple and powerful !',0 .code _ProcWinMain proc uses ebx edi esi,hWnd,uMsg,wParam,lParam local @stPs:PAINTSTRUCT local @stRect:RECT local @hDc mov eax,uMsg .if eax == WM_PAINT invoke BeginPaint,hWnd,addr @stPs mov @hDc,eax invoke GetClientRect,hWnd,addr @stRect invoke DrawText,@hDc,addr szText,-1,/ addr @stRect,/ DT_SINGLELINE or DT_CENTER or DT_VCENTER invoke EndPaint,hWnd,addr @stPs .elseif eax == WM_CLOSE invoke DestroyWindow,hWinMain invoke PostQuitMessage,NULL .elseif eax == WM_SETTEXT invoke wsprintf,addr szBuffer,addr szReceive,lParam,lParam invoke MessageBox,hWnd,offset szBuffer,addr szCaptionMain,MB_OK .else invoke DefWindowProc,hWnd,uMsg,wParam,lParam ret .endif xor eax,eax ret _ProcWinMain endp _WinMain proc local @stWndClass:WNDCLASSEX local @stMsg:MSG invoke GetModuleHandle,NULL mov hInstance,eax invoke RtlZeroMemory,addr @stWndClass,sizeof @stWndClass invoke LoadCursor,0,IDC_ARROW mov @stWndClass.hCursor,eax push hInstance pop @stWndClass.hInstance mov @stWndClass.cbSize,sizeof WNDCLASSEX mov @stWndClass.style,CS_HREDRAW or CS_VREDRAW mov @stWndClass.lpfnWndProc,offset _ProcWinMain mov @stWndClass.hbrBackground,COLOR_WINDOW + 1 mov @stWndClass.lpszClassName,offset szClassName invoke RegisterClassEx,addr @stWndClass invoke CreateWindowEx,WS_EX_CLIENTEDGE,/ offset szClassName,offset szCaptionMain,/ WS_OVERLAPPEDWINDOW,/ 100,100,600,400,/ NULL,NULL,hInstance,NULL mov hWinMain,eax invoke ShowWindow,hWinMain,SW_SHOWNORMAL invoke UpdateWindow,hWinMain .while TRUE invoke GetMessage,addr @stMsg,NULL,0,0 .break .if eax == 0 invoke TranslateMessage,addr @stMsg invoke DispatchMessage,addr @stMsg .endw ret _WinMain endp start: call _WinMain invoke ExitProcess,NULL end start ;发送端 .386 .model flat,stdcall option casemap:none include windows.inc include user32.inc includelib user32.lib include kernel32.inc includelib kernel32.lib .data hWnd dd ? szBuffer db 256 dup (?) .const szCaption db 'SendMessage',0 szStart db 'Press OK to start SendMessage, param: %08x!',0 szReturn db 'SendMessage returned!',0 szDestClass db 'MyClass',0 szText db 'Text send to other windows',0 szNotFound db 'Receive Message Window not found!',0 .code start: invoke FindWindow,addr szDestClass,NULL .if eax mov hWnd,eax invoke wsprintf,addr szBuffer,addr szStart,addr szText invoke MessageBox,NULL,offset szBuffer,/ offset szCaption,MB_OK invoke SendMessage,hWnd,WM_SETTEXT,0,addr szText invoke MessageBox,NULL,offset szReturn,/ offset szCaption,MB_OK .else invoke MessageBox,NULL,offset szNotFound,/ offset szCaption,MB_OK .endif invoke ExitProcess,NULL end start