我目前製作一個多執行緒程式我在unit有放置一個edit那麼我又加入了一個多執行緒程式(unit2)可是我在unit2中的private內加入了myedit:tedit可是會出現錯誤無法執行我也有使用了file內的use use unit可是還是不行我到底是少了什麼設定呢???謝謝

Hi,  sun_chih_yen 您好： 根據我之前的經驗，除了引用 unit 1 之外，還得在 Thread 的 constructor  中把 Edit 物件傳入，其他物件也是一樣，以下是我的例子 ***************************************************************** 宣告區： type   QueryThread = class(TThread)   private     { Private declarations }     FQuery : TQuery ;     FADOcommand : TADOcommand;     FStringgrid : TStringgrid;     FLabel : TLabel;   protected     procedure GiveAnswer; // 告訴主程式Query已完成     procedure Execute; override; // 執行Query的動作   public     constructor Create(AADOcommand : TADOCommand;AStringgrid:TStringgrid;ALabel:TLabel; AQuery :TQuery );   end; ********************************************************************* 程式區： constructor QueryThread.Create(AADOcommand : TADOCommand;AStringgrid:TStringgrid;ALabel:TLabel;AQuery : TQuery); begin FQuery := AQuery ; FADOcommand := AADOcommand; FStringgrid := AStringgrid; FLabel := ALabel; inherited Create(False); FreeOnTerminate := True; end; ********************************************************************* 接著你在 procedure QueryThread.Execute; 方法中就可操作所傳入的物件了 例如 FLabel.caption := '我的標題'; 希望對你有幫助，另外建議你在站內搜尋 Thread 和 執行緒，應該有許多的相 關文章。    ========================

我要努力向上~~[/h5] ========================