VCL实现同步方法就是调用线程类的Synchronize的过程，此过程需要一个无参数的procedure，故在此procedure中无法传递参数值，但可以通过类的成员来实现。在类的Execute中只须调用Synchronize就可以了。

 　　如果在线程中对VCL赋值操作，在连续执行多次以后，会报“Canvas  does not allow drawing”错误，这个错误可以由上述方法修复，把赋值操作让窗体主线程来完成。

　　关键在于对Synchronize参数的定义。定义一个无参数的procedure通过它来访问类的成员变量szName和nIndex。在类的重载Execute中调用Synchronize。

　　例证代码：

　　 1 

 程序说明：我这里定义了一些Tlabel的成员变量，根据构造函数来初始化成界面上的对应控件，在这里等同于界面上的label，在Execute函数中不停调用WatchAction过程，起先我的写法如下：

 在连续执行到9k次以上时，报“Canvas  does not allow drawing”错误。修改后解决问题：

 1        QueryPerformanceFrequency(CounterFrequency);