Udp数据接收端实现.docVIP

Udp数据接收端实现 ----Delphi实现 Lanno Ckeeke??????? LC2005052202 概要 此程序本想与上一篇实现的功能相同，代码是在delphi6编写。 正在装载数据…… 与Ｃ++程序相比，其发送端发送数据太快，在一个for循环中连续调用sendto２０次，则此程序将不能完全接收到数据。若在for循环中每发送一次数据后 sleep(200)，则此程序可以接收全部的数据。这就是ＵＤＰ数据传输的不可靠性吗？而Ｃ++程序（LC2005052201）则不会出现此现象。进一步考虑中。。。。。。 说明 所用到的函数与LC2005052201相同，可以参见上一篇文章。 窗体中一个Button用于启动程序进行必要的socket设置，并开始接收数据（处于阻塞状态）；一个EditBox用于显示接收数据的次数；一个ListBox用于显示已接收到的数据。 ? 变量说明在代码中有详细的注释。 unit Unit1; ? interface ? uses ?Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, ?Dialogs, StdCtrls,Winsock; ? type ?TForm1 = class(TForm) ??? Button2: TButton;??? //开始接