Lazarus/FPC中的接口：多繼承

Question

我試圖創建一個外殼擴展來爲Windows資源管理器「infotips」中的JPEG文件提供EXIF信息，並使用Lazarus，因爲這需要生成一個x64 DLL。

Lazarus是否支持與接口的多重繼承，如果是的話，我該如何去做呢？

例如，像：

type 
    IInfoTips = interface(IPersistFile, IQueryInfo) 

謝謝， 馬克

Answer 1

否，在FPC接口不支持多繼承呢。

你可以做的是讓實現類從兩個接口繼承：

type 
    TMyInfoTips = class(TInterfacedObject, IPersistFile, IQueryInfo) 

但不是在接口級，如你所願。這樣的語句不會編譯：

type 
    IInfoTips = interface(IPersistFile, IQueryInfo) 

您只能從單個接口類型「繼承」。

Delphi也不支持它。只有不存在的Delphi for .Net compiler ......但是因爲.Net/C＃IR支持（並期望）該功能。

我也在Delphi或FPC中缺少這個功能。

Answer 2

兩個接口在shlobj定義爲免費帕斯卡爾/拉撒路，就像德爾福。如果符號在德爾菲終身期間改變了單位，我們嘗試將它們放在更新的單位中，但是那裏存在大量積壓。

所有這些都應該在很大程度上與Delphi兼容，如果你解釋了什麼不能像預期的那樣工作，也許會更容易。

添加後阿爾諾的評論：

不，它不需要。對象在Pascal中實現接口。我真的不明白爲什麼這麼做真的很重要。當然這是一個有點語法糖，但由於任何Delphi風格界面實現的IUnknown，你可以查詢接口的另一個接口：

uses activex; 

var x :IPersistfile; 
    y :IPersistStream; 
begin 
    x.queryinterface(IID_IPersistStream,y); 
end.