delphi7中没有TNMUDP组件, 那里有代替它的组件(5分)

  • 主题发起人 主题发起人 青云
  • 开始时间 开始时间

青云

Unregistered / Unconfirmed
GUEST, unregistred user!
我以前用TNMUDP组件实现局域网的聊天程序,但是delphi7中没有TNMUDP组件,
那么该用什么控件代替TNMUDP。
很多朋友告诉我,用indy里面的udp组件.
但是有 indy servers 和 indy Clents 两个组件板,该如何使用.

 
你可以用internet面板上udpsocket组件
 
根据:"你可以用internet面板上udpsocket组件 " 的 建议:
======
于是我就这样做:

//发送数据:
procedure TfrmZh.Button1Click(Sender: TObject);
var
buf:array[0..12] of byte;
begin
buf[0]:=12;
buf[1]:=23;
buf[2]:=34;
self.UdpSocket1.SendBuf(buf,3);
end;
//接收数据
procedure TfrmZh.UdpSocket1Receive(Sender: TObject; Buf: PAnsiChar;
var DataLen: Integer);
var rbuf:array [0..12] of byte;


begin
CopyMemory(@rbuf[0], buf, DataLen);
self.Memo1.Lines.Add(inttostr(rbuf[0])+inttostr(rbuf[1])+inttostr(rbuf[2]) ) ;
showmessage('get data');
end;


结果没有反应.

============================
 
后退
顶部