多线程下的BCB6.0临界区

本多线程是使用的临界区：CRITICAL_SECTION 按下按钮，通知线程要写入一串字符（线程执行完需要2s以上），延时20ms后通知线程再写入一串字符，跟第一次写入造成“冲突”，延时20ms后，在两个写都没完成时再通知线程要读同一个记事本。 因此造成线程中三个事件“打架”。 可通过临界区成功解决了线程执行的冲突问题，最终3个事件都会完美执行。可以很轻易地移植成对数据库的操作，若使用ADO需要在线程中对COM对象初始化（CoInitialize）。