whisht

　　　　十年
  博客园 :: 首页 :: 博问 :: 闪存 :: 新随笔 :: 联系 :: 订阅 订阅 :: 管理 ::

2011年10月24日

VC Delphi WM_COPYDATA
摘要： 发送消息DELPHI代码 View Code 1//VCUnicode项目2var3wData:String;4h:HWND;5cds:TCopyDataStruct;6begin7wData:='1234567890'+Chr(0);8cds.dwData:=0;9cds.cbData:=Length(wData);10cds.lpData:=PWideChar(wData);11SendMessage(h,WM_COPYDATA,0,LongWord(@cds));12end1314//非VCUnicode项目15var16wData:WideString;17h:HWND 阅读全文
posted @ 2011-10-24 14:38 WHISHT 阅读(237) 评论(0) 推荐(0) 编辑

VC Delphi WM_COPYDATA 消息
摘要： 发送消息DELPHI代码View Code 1//VCUnicode项目2var3wData:String;4h:HWND;5cds:TCopyDataStruct;6begin7wData:='1234567890'+Chr(0);8cds.dwData:=0;9cds.cbData:=Length(wData);10cds.lpData:=PWideChar(wData);11SendMessage(h,WM_COPYDATA,0,LongWord(@cds));12end1314//非VCUnicode项目15var16wData:WideString;17h:HWND; 阅读全文
posted @ 2011-10-24 14:36 WHISHT 阅读(146) 评论(0) 推荐(0) 编辑

VC Delphi WM_COPYDATA 消息
摘要： VC Unicode项目发送消息DELPHI代码var wData: String; h: HWND; cds: TCopyDataStruct;begin wData:= '1234567890'+ Chr(0); cds.dwData:= 0; cds.cbData:= Length(wData); cds.lpData:= PWideChar(wData); SendMessage(h, WM_COPYDATA, 0, LongWord(@cds));end非VC Unicode项目var wData: WideString; h: HWND; cds: TCopy... 阅读全文
posted @ 2011-10-24 14:24 WHISHT 阅读(460) 评论(0) 推荐(0) 编辑