小
小明儿
Unregistered / Unconfirmed
GUEST, unregistred user!
客户端:
UDPClient.SendBuffer(127.0.0.1,1024,TempSend,SizeOf(TempSend));
TempSend为一个结构体:
MessagesComponent= record
PacketLength :Word;
HeaderLeghth :Byte;
DestinationCode :Array[1..10] of Char;
MessagesData :Array of Char;
end;
服务端怎么接收速据啊?
procedure TFrmserver.UDPServerUDPRead(Sender: TObject; AData: TStream;
ABinding: TIdSocketHandle);
Begin
??????
end;
UDPClient.SendBuffer(127.0.0.1,1024,TempSend,SizeOf(TempSend));
TempSend为一个结构体:
MessagesComponent= record
PacketLength :Word;
HeaderLeghth :Byte;
DestinationCode :Array[1..10] of Char;
MessagesData :Array of Char;
end;
服务端怎么接收速据啊?
procedure TFrmserver.UDPServerUDPRead(Sender: TObject; AData: TStream;
ABinding: TIdSocketHandle);
Begin
??????
end;