第4章中的实验,send和receive

 send的代码:
    .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 dd  256 dup (?)
    ;******************************************
       .const
    szCaption db 'SendMessage',0
    szStart  db 'Press OK to start SendMessage,param :%8x!',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

 

 

 

receie的代码:

    .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 dd  256 dup (?)
    ;******************************************
       .const
    szCaption db 'SendMessage',0
    szStart  db 'Press OK to start SendMessage,param :%8x!',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

 

评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值