chenyz634 发表于 2014-2-27 10:02:32

delphi 在windows服务程序里用idudpServer

我做了一个简单的系统服务程序，用了IdUdpServer的控件，客户端是IdUdpClient，当客户端发广播的时候，服务端OnRead收不到数据。但将服务器端改成了Application后，OnRead却可以接收到数据了。这是怎么回事啊？

comeheres 发表于 2014-2-27 19:11:17

。。。问题都是复制的

chenyz634 发表于 2014-3-3 10:53:05

comeheres 发表于 2014-2-27 19:11 static/image/common/back.gif
。。。问题都是复制的

因为我确实也越到了这个问题。顺手把问题复制了一下。:lol:

chenyz634 发表于 2014-3-3 10:54:20

不过现在问题自己解决了。

chenyz634 发表于 2014-3-3 10:57:15

在客户端设置一下UDPClient的属性如下：
IdUDPClient1.Port := UDP_DEFAULT_PORT;
IdUDPClient1.Host := '255.255.255.255';
IdUDPClient1.BroadcastEnabled := True;
IdUDPClient1.Active := True;
然后就可以广播消息了
x := $00;
IdUDPClient1.SendBuffer(x,4);
在服务器端的execute里接收消息即可
PeerIP := ABinding.PeerIP;
PeerPort:= ABinding.PeerPort;
count := AData.Size;
if count > Length(Buffer) then
begin
    exit;
end;
AData.Read(Buffer, count);

595835881 发表于 2014-5-11 14:48:06

来过了:lol:，楼主这东东太实用了

tlwangxd 发表于 2014-10-22 16:11:59

1
页: [1]
查看完整版本: delphi 在windows服务程序里用idudpServer