MSCOM 控件中 OnComm事件函数为什么会卡死

我在OnComm消息函数中添加:
   if MSCom1.ComEvent = 2 then
   begin      Restr := MSCom1.Input; // 从串口提取数据
      .........
      ..........   end;正常运行程序时是正常的，都没有发生什么问题.可是当做测试时,手动不断的给串口发送
乱码的数据.发了一段时间.程序就会假死住,并且卡住了.等过段时间,又可恢复正常.
并且接受了从串口传过来的数据.  请问该如何解决.