首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > .NET > .NET >

这段代码有关问题出在那里

2012-05-16 
这段代码问题出在那里Delphi(Pascal) codeprocedure TForm1.btn1Click(Sender: TObject)varh:HWNDcmd:st

这段代码问题出在那里

Delphi(Pascal) code
procedure TForm1.btn1Click(Sender: TObject);var  h:HWND;  cmd:string;  cpd : COPYDATASTRUCT;begin  h := FindWindow('ACG!',nil);  cmd := 'connect 61.152.242.114:27014';   cpd.dwData := 0;  cpd.cbData := Length(cmd);  cpd.lpData := PChar(cmd);  SendMessage(h,WM_COPYDATA,$12,Lparam(@cpd));end;


查看窗体的时候发现显示自己设置的字符后面多了这么几个字符 EdAwzdAw0,是什么原因呢。


[解决办法]
cpd.cbData := Length(cmd) + 1;

问题如果解决请及时结贴:)

热点排行