gear1023 朋友:我昨天照你的方法做了一個從一台機器向另一台機器發送信息的東東,但是現在問題多多!就是每次發送的信息后面它都會帶上一些亂碼!積分我已給你2

  • 主题发起人 ye802808
  • 开始时间
Y

ye802808

Unregistered / Unconfirmed
GUEST, unregistred user!
gear1023 朋友:我昨天照你的方法做了一個從一台機器向另一台機器發送信息的東東,但是現在問題多多!就是每次發送的信息后面它都會帶上一些亂碼!積分我已給你20了,這個問題幫我再搞搞(1分)<br />如題
 
NET_API_STATUS NetMessageBufferSend(
LPWSTR servername,
LPWSTR msgname,
LPWSTR fromname,
LPBYTE buf,
DWORD buflen
);
我发现MSDN中的内容与上面gear1023朋友说的不同。
参数buf都是字节指针,buflen是字节长度
我试一下
 
刚才出去了一会。
他的声明是对的。
我写了下面的程序,信息正常
procedure TForm1.Button1Click(Sender: TObject);
var
msgto, msg: WideString;
len: Integer;
begin
msgto := '127.0.0.1';
msg := 'ok?可以吗?';
len := Length(msg) * SizeOf(WideChar);
NetMessageBufferSend(nil, @msgto[1], nil, @msg[1], len);
end;
 
顶部