, 26 2016 . 05:36
+
.
UDP. ( ) .
2 : . TidUDPClient TidUDPServer. :
- 5001
- 5000
:
[Code]procedure TMainForm.UDPServerUDPRead(Sender: TObject; AData: TStream;
ABinding: TIdSocketHandle);
begin
memo.Lines.Add('');
memo.Lines.Add(DateTimeToStr(now));
memo.Lines.Add(': '+ABindi ...
http://www.delphikingdom.com/asp/answer.asp?IDAnswer=83222