青
青云
Unregistered / Unconfirmed
GUEST, unregistred user!
以前用习惯了TNMUDP组件,可惜Delphi7没有了,我真不知道Boralnd公司为何要这样。
害的我好苦。
我想用Internet组件板下的TUdpSocket组件来实现以前的TNMUDP组件功能。
但是老是有问题:
比如
udpSocket1.Localhost:=127.0.0.1 ; // TNMUDP组件没有Localhost这个属性。
udpSockte1.Localport:=10000;
udpSockte1.RemoteHost:=127.0.0.1;
udpSockte1.Remoteport:=10000;
procedure Tform1.UdpSocket1Send(Sender: TObject; Buf: PAnsiChar;
var DataLen: Integer);
begin
showmessage('send');
end;
procedure Tform1.UdpSocket1Receive(Sender: TObject; Buf: PAnsiChar;
var DataLen: Integer);
begin
showmessage('receive');
end;
//开始发送数据
procedure Tform1.Button1Click(Sender: TObject);
begin
self.UdpSocket1.Sendln('hello!');
end;
这时电脑会提示“send”,但是不提示“receive”!
为什么,这个问题困饶我好久了。
希望各位兄弟帮帮我啊!