delphi多線程編程文庫-閱讀頁
2025-01-22 11:40本頁面
【正文】 可能會導(dǎo)致錯誤，不到萬不得已，最好不要使用。 //掛起 。 五、 線程的優(yōu)先級： 在多線程的情況下，一般要根據(jù)線程執(zhí)行任務(wù)的重要性，給線程 適當(dāng)?shù)膬?yōu)先級，一般如果量的線程同時申請 CPU 時間，優(yōu)先級高的線 程優(yōu)先。也就是在 Tthread 中聲明了一個 枚舉類型 TTthreadPriority: type TTthreadPriority(tpidle,tpLowest,tpLower,tpNormal, tpHight,tpHighest,tpTimecrital) 分別對應(yīng)的是最低（系統(tǒng)空閑時有效， 15），較低（ 2），低 （ 1），正常（普通 0），高（ 1），較高（ 2），最高（ 15）。 設(shè)置優(yōu)先級可使用 thread對象的 priority屬性： :=Tthreadpriority(級別 )。用兩個 ADOTable控件， 分別連到兩個數(shù)據(jù)庫，并且分別通過 DataSource控件，與數(shù)據(jù)幫定控 件聯(lián)系就可以了，這樣就可以實(shí)現(xiàn)前后臺處理數(shù)據(jù)庫問題。在單線程時，每個數(shù)據(jù)源的建立就自動生成一個 Session， 這是這個數(shù)據(jù)源私有的關(guān)于數(shù)據(jù)庫信息的文件。 Databas數(shù)據(jù)源可以接受來自不同數(shù)據(jù)平臺的數(shù)據(jù)庫。 Tablename=表名 Active=true （激活） 以后比如加入 Datasoucre和其他一樣，這樣就可以構(gòu)造兩個前后 臺處理的數(shù)據(jù)庫管理系統(tǒng)了。 例如一個拷貝文件，拷貝線程完成一個程序塊后，再喚醒進(jìn)程條 線程做一個格的填充。 一、使用 Synchronize 方法 這個方法用于訪問 VCL 主線程所管理的資源，其方法的應(yīng)用是： 第一步：把訪問主窗口（或主窗口控件資源）的代碼放到線程的 一個方法中； 第二步：是在線程對象的 Execute方法中，通過 Synchronize方法 使用該方法。 begin Synchronize(update)。 procedure 。 這里通過 Synchronize使線程方法 update同步。另外，一個很重要的控件對象叫 TCanvas，提供了一個 Lock方法用于線程的同步，當(dāng)一 個線程使用此 控件對象的時候，首先調(diào)用這個對象的 Lock方法，然后對這個控件 進(jìn)行操作，完畢后再調(diào)用 Unlock方法，釋放對控間的控制權(quán)。 try 畫圖 finally 。 {使用這個保護(hù)機(jī)制 ,保證不論有沒有異常， unlock都會被執(zhí)行 否則很可能會發(fā)生死鎖。 這個方 法屬于等待線程對象， Waitfor方法的原型如下 : Function Waitfor(Const Astring:string):string。 。 那么所有的線程都必須等待 thread1運(yùn)行完畢后才能運(yùn)行，其中 包括主線程，可以預(yù)想，由于 thread1調(diào)用了主窗體的 Edit控件，那 么，在 thread1運(yùn)行中間， Edie1也不會顯示。 這點(diǎn)在應(yīng)用的時候要謹(jǐn)慎。 1）臨界區(qū) 使用線程的時候，遇到的一個基本的問題，就是多個線程訪問同 一個對象，比如訪問相同的文件、 DLL、相同的通訊資源，特別是數(shù) 據(jù)庫的訪問，當(dāng)多個線程對同一數(shù)據(jù)庫字段寫入的時候，其結(jié)果會出 現(xiàn)不確定性。 初始化： initializeCriticalSection(cs)。 解除獨(dú)占 LeaveCriticalSection(CS)。 請注意，臨界區(qū)只能在一 個進(jìn)程內(nèi)使用，首先要標(biāo)記出把數(shù)據(jù)作為臨 界區(qū)操作的那些代碼，在這部分代碼執(zhí)行前，計(jì)算機(jī)首先要查看一下全局 記錄，已確定是否有其它線程在臨界區(qū)中，同時也要查看這個臨界區(qū)是否 和第一個臨界區(qū)相關(guān)，也就是說同一個程序中可能會有幾個不同的臨界區(qū)， 然后計(jì)算機(jī)再決定運(yùn)行
公司管理相關(guān)推薦
鄂ICP備17016276號-1