delphi编写的udp接收数据，丢包问题

delphi编写的udp接收数据，
发送端：速度150包每秒，每包1290B。
要求接收到数据后，保存数据，并且显示出来。

现在遇到的问题是：

程序运行时，如果不操作其他程序，鼠标焦点只保存在本程序上，则无论接收多少包，都不会丢失数据包
但是如果运行时也进行其他程序的操作，那么就会丢失数据，并且一丢就会丢连续的30-34包数据

请问有没有什么解决办法？