摘要: 关于多线程中创建使用TADOConnect、TADODataSet等Com组件时,必须先初始化Com在多线程启用执行前CoInitialize(nil);在多线程启用执行后CoUninitialize; 阅读全文
posted @ 2014-08-15 16:29 胡伟峰 阅读(1458) 评论(0) 推荐(0) 编辑
摘要: 1.TThread.CreateAnonymousThread(); //普通2.TThread.Queue(); //队列3.TThread.Synchronize(); //VCL 同步 阅读全文
posted @ 2014-08-15 16:09 胡伟峰 阅读(108) 评论(0) 推荐(0) 编辑
摘要: 先看一个非多线程的例子, 代码执行时不能进行其它操作(譬如拖动窗体):{自定义方法: 在窗体上绘制...}procedure MyMethod;var i: Integer;begin for i := 0 to 500000 do begin Form1.Canvas.Lock; Form1.... 阅读全文
posted @ 2014-08-15 16:00 胡伟峰 阅读(3299) 评论(0) 推荐(0) 编辑