解决使用Delphi的Thread时主线程阻塞

      最近在使用Thread时发现，如果在同步代码中有运行比较长的算法时，会把主线程阻塞，使界面无法操作。找了很多资料后来发现，在要在运行比较长的算法中加入Application.ProcessMessages。
      Application.ProcessMessages的意思是响应主线程中消息队列里的消息。