首先當然是打開你的delphi 6 ，點取菜單欄中的文件－新建－其它，彈出一個標簽窗口，選取new標簽，然后找到Thread Object，就是它了，雙擊它就行了，彈出一個類命名窗口，輸入mythread，當然名稱可由你自已來定的。這時程序自動創建一個unit，我這里是unit2，現在我們來看unit，代碼如下：

unit Unit2;

interface

uses
  Classes;

type
  mythread = class(TThread)
  PRivate
    { Private declarations }
  protected
    procedure Execute; override;
  end;

implementation

{ Important: Methods and properties of objects in VCL or CLX can only be used
  in a method called using Synchronize, for example,

      Synchronize(UpdateCaption);

  and UpdateCaption could look like,

    procedure mythread.UpdateCaption;
    begin
      Form1.Caption := 'Updated in a thread';
    end; }

{ mythread }

procedure mythread.Execute;
begin
  { Place thread code here }
end;

end.

其中，你注意找到procedure mythread.execute;，應找到了吧，連我都看到了，這就是你剛才建立的線程了，那么接下來，我們要做的就是加入后臺執行的代碼，代碼要加在那里？不會吧，當然是加在
begin
 //這里就是加入程序代碼的地方了
end;
如果你要調用unit1上的控件，你可以在unit2上面的uses中加入unit1就行了，記住，在unit1里的implementation后面增加uses unit2，這樣你就可在unit1中引用線程了，引用的方法很簡單，就是，就是，就是，好啦，不賣關了，就是mythread.Create(false);。OK 這就是delphi中的線程，呵呵。

本人剛學delphi 有什么地方說得不對的，歡迎評批指證，我的聯系信箱[email protected]謝謝！