没想到Delphi在线程安全方法作的会这么差。(200分)

beta的方法是可行的
 
多人接受答案了。
 
顶部