Delphi多线程学习（10）：Label(VCL)同步的问题
上文中，多线程同步主窗体的Label的Caption属性值，发现一个问题：使用Synchronize用于同步的时候，主窗体好像死掉一样；而直接用子程序为Label的引用赋值，则有时会出现“Canvas does not allow drawing”错误。书上说VCL同步一定要用Synchronize，而不能直接访问。
测试：
{主窗体}
unit Unit2;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TForm2 = class(TForm)
Label1: TLabel;
Button1: TButton;
Label2: TLabel;
Label3: TLabel;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form2: TForm2;
implementation
uses TestThread;
{$R *.dfm}
procedure TForm2.Button1Click(Sender: TObject);
begin
TTestThread.Create(Label1);
//TTestThread.Create(Label2);
//TTestThread.Create(Label3);
end;
end.{多线程类}
unit TestThread;
interface
uses
Classes,StdCtrls;
type
TTestThread = class(TThread)
private
{ Private declarations }
FLabel:TLabel;
Fstr:string;
procedure UpdateLabel;
protected
procedure Execute; override;
public
constructor Create(Lab:TLabel);
end;
implementation
uses Unit2,SysUtils,windows;
{ TTestThread }
constructor TTestThread.Create(Lab: TLabel);
begin
FLabel:=Lab;
Inherited Create(False);
FreeOnTerminate:=True;
end;
procedure TTestThread.Execute;
var
i:Integer;
begin
{ Place thread code here }
for i := 0 to 20000 do
begin
if Not Terminated then
begin
Fstr:=Format('线程ID：%d,第%d个循环',[GetCurrentThreadID,i]);
//UpdateLabel;
Synchronize(UpdateLabel);
end;
end;
end;
procedure TTestThread.UpdateLabel;
begin
FLabel.Caption:=Fstr;
end;
end.
经过测试，只创建一个线程，用Synchronize同步主窗体的一个Label，那么程序无问题，可以见到同步的过程。当�
相关文档：
用Delphi 实现串口通讯，常用的几种方法为：使用控件如MSCOMM和SPCOMM，使用API函数或者在Delphi 中调用其它串口通讯程序。利用API编写串口通信程序较为复杂，需要掌握大量通信知识，其优点是可实现的功能更强大，应用面更广泛，更适合于编写较为复杂 的低层次通信程序。相比较而言，利用SPComm控件则相对较简单，该控件具� ......
TThread是一个抽象类,用于在delphi中创建线程。
创建一个TThread的子类对象即相当于创建一个线程。
当一个应用程序运行时，应用程序就被载入内存准备执行。此时，它成为包含一个或多个线程的进程。线程执行应用程序的部分内容，并由操作系统分配CPU时间。同一进程的所有线程共享同一地址空间，可以访问进程的全局变量 ......
现有一系统不定时在同一目录下生成一批txt文件,内容大概如下;
20100112_164910,6,81406392,808,113,,
为方便统计,需要将这些txt文件中的数据读入数据表中.
现有两种方法:
一是直接将数据读入到数据表中的某一列中,再用sql 语句拆开成几列:
......
一个线程的优先级取决于创建线程的进程的优先级（priority class）和线程本身相对的优先级（relative priority）。
1、进程优先级：
不同操作系统 优先级数目不同。Windows2000以上的版本列表如下：
Idle：（标志：IDLE_PRIORITY_CLASS，值为$40）；
Below Normal：（标志：BEL ......
ADO多线程数据库查询通常会出现3个问题：
1、CoInitialize 没有调用（CoInitialize was not called）；所以，在使用任何dbGo对象前，必须手 调用CoInitialize和CoUninitialize。调用CoInitialize失败会产生"CoInitialize was not called"例外。
2、画布不允许绘画（Canvas does not allow drawing）；所以，必须通过Synch ......
