Delphi中的泛型並返回對tlist的引用<class>

Question

我仍然使用Delphi XE4（我使用多個Delphi編譯器的最新編譯器），並且需要特定的解決方法，因爲它們完全隱藏了此版本中的TBasicAction中的FClients。我在連接/斷開客戶端運行時設置啓用/禁用（以避免與〜100 +行動和用戶界面元素閃爍），因此這種解決方法爲XE4：

這是我的天真嘗試，只是返回字段。

TmscBasicActionCrack = class(TBasicAction) 
    end; 
{$IFDEF mymsDELPHIXE4} 
    TmscBasicActionHelper = class helper for TBasicAction 
    public 
    function Helper_Get_Private_FClients: TList<System.Classes.TBasicActionLink>; 
    end; 
{$ENDIF} 

{$IFDEF mymsDELPHIXE4} 
//------------------------------------------------------------------------------ 
function TmscBasicActionHelper.Helper_Get_Private_FClients: TList<System.Classes.TBasicActionLink>; 
begin 
    Result := Self.FClients; 
end; 
{$ENDIF} 

不過，我得到錯誤

E2003未說明的標識符從TList <>

我必須承認，我從來沒有到處去使用泛型與德爾福，因爲我最初聽到的穩定性問題+我需要保持與Lazarus/FreePascal的兼容性。

我知道最新版本的Delphi再次改變類的幫手，但我現在主要感興趣的是得到這個用Delphi XE4工作

Answer 1

該錯誤表明TList<T>類型是未知的編譯器。要使用它，您必須在您的uses條款中包含System.Generics.Collections。