X
xuxiaohan
Unregistered / Unconfirmed
GUEST, unregistred user!
我的程序是企业内部网使用的QQ，以前用nmUdp 进行通讯， 近来因为增加动态表情，改用IdUdp， 因为没有服务程序，登录时候发广播，
昨天发现一个问题， 在win98 下IdUdpSever 无法收到 广播， 以至其他在线用户无法知道对方登录， 惨！
一开始没有留意这个问题， 我开始用几台装 WinXp 的电脑调试的， 根本就没有问题， 广播地址 是 255.255.255.255 或者 是128.30.255.255，都没有问题。
procedure Tdm.Login;
begin
UdpClient.Host:=GetBroadCastIp;
sendPkInfo(dmLogin);
end;
procedure Tdm.sendPkInfo(DlgMsg: TDlgMessage);
var
info: TbaseInfo;
begin
writebaseInfo(info, DlgMsg);
UdpClient.SendBuffer(info, sizeof(info));
end;
昨天发现一个问题， 在win98 下IdUdpSever 无法收到 广播， 以至其他在线用户无法知道对方登录， 惨！
一开始没有留意这个问题， 我开始用几台装 WinXp 的电脑调试的， 根本就没有问题， 广播地址 是 255.255.255.255 或者 是128.30.255.255，都没有问题。
procedure Tdm.Login;
begin
UdpClient.Host:=GetBroadCastIp;
sendPkInfo(dmLogin);
end;
procedure Tdm.sendPkInfo(DlgMsg: TDlgMessage);
var
info: TbaseInfo;
begin
writebaseInfo(info, DlgMsg);
UdpClient.SendBuffer(info, sizeof(info));
end;