delphi接口和編程兩大陷阱(編輯修改稿)
2025-07-25 08:16 本頁面
【文章內(nèi)容簡介】 Result := IVCLComObject(FVCLComObject)._Release。 end。 不是Com對(duì)象的話，就什么也沒作。我們作的不是Com對(duì)象，是不是就沒有任何問題了呢？答案依然是否定的，考慮如下情況： OBJ2 := 。 try Intf1 := OBJ2。 。 Finally 。 Intf1 := nil。 End。 會(huì)怎么樣呢？會(huì)出非法地址訪問錯(cuò)誤。為什么？上面說過把接口引用設(shè)為nil時(shí)，會(huì)調(diào)用_IntfClear，而_IntfClear又會(huì)調(diào)用對(duì)象的_Release，而這時(shí)這個(gè)對(duì)象已經(jīng)釋放了，自然就出非法地址訪問錯(cuò)誤啦。 有人說多此一舉嗎，接口引用只是個(gè)地址，沒必要手動(dòng)設(shè)為nil。 OBJ2 := 。 try Intf1 := OBJ2。 。 Finally 。 End。 結(jié)果可能還會(huì)出你的意料，還是非法地址訪問錯(cuò)誤。為什么？因?yàn)镈elphi編譯器耍了個(gè)小聰明，它認(rèn)為你忘記把這個(gè)地址引用置為nil了，所以你會(huì)自動(dòng)給你加上，看來Delphi編譯器聰明過頭了J。 怎么解決呢？ 方法1，先把接口引用置為nil，再釋放對(duì)象。 Intf1 := nil。 。 方法2，把接口引用強(qiáng)制轉(zhuǎn)成指針類型再置為nil。 Pointer(Intf1) := nil。 此時(shí)相當(dāng)于直接把地址清零，不會(huì)調(diào)用_IntfClear。 我傾向于使用第二種方法，這樣你就不用考慮先釋放誰的問題了。而且有些設(shè)計(jì)模式中你可能只持有接口引用，而且你也不知道引用的對(duì)象什么時(shí)候釋放，此時(shí)就必須使用方法2。 例如考慮Composite模式。 TComposite = class(TComponent, I1) Private interList: TXContainer。//一個(gè)容器類,存放“葉子”的接口引用。 Public Procedure Add (AIntf: I1）。 function DO: Boolean。 End。 它應(yīng)該釋放它的“葉子”嗎？
環(huán)評(píng)公示相關(guān)推薦
鄂ICP備17016276號(hào)-1