{  单元名称: ThreadSyncHelper                       }
{  功    能: 让DLL或ActiveX控件中封装的线程对象     }
{            能正常使用Synchronize方法              }
{  注    释: 弥补Delphi的封装缺陷；Delphi专用       }
{            Delphi6/2009测试通过                   }