我的程式在執行其他程序及迴路時 按鍵常常無法及時反應 例如利用updown時，值常常會相差1 我已有使用Application.ProcessMessages; 但仍會造成延遲的狀況 請問這該如何解決呢? 謝謝 發表人 - ddy 於 2002/11/28 14:24:28

不知道您是否有使用Multi_Thread 試過 而您所說的值差1...指的是什麼值?

沒有…sorry， 我對multi-thread不太了解 請問那該如何使用

引言: 沒有…sorry， 我對multi-thread不太了解 請問那該如何使用

建立 Thread 如下 1 MainMenu->NEW->Other 2 在 NEW Page 中 選擇 Thread Object 3 輸入 New Class Name (例: TEST) 4 開始撰寫 程序 unit Unit2; interface uses Classes; type test = 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 test.UpdateCaption; begin Form1.Caption := 'Updated in a thread'; end; } { test } procedure test.Execute; begin { Place thread code here } // 在這裡 寫入 你的 程序及迴路 end; 5 在你的主程式加入 var SecondProcess:test; { test is a custom descendant of TThread } begin SecondProcess:=Test.Create(True); { create suspended ?secondprocess does not run yet } SecondProcess.Priority := tpLower; { set the priority to lower than normal } SecondProcess.Resume; { now run the thread } end; 現在你可以試看看 bye! bye!

感謝cmf大大還特別抽空解答此問題