将Append方法添加到通用TArray类型

我正在尝试向Append类型添加System.Generics.Collections.TArray方法。

unit uMyArray;

interface

uses
  System.Generics.Collections;

type
  TArray = class(System.Generics.Collections.TArray)
  public
    class procedure Append<T>(var AValues: array of T; const AItem: T); static;
  end;

implementation

class procedure TArray.Append<T>(var AValues: array of T; const AItem: T);
begin
  SetLength(AValues,Length(AValues) + 1);
  AValues[Length(AValues) - 1] := AItem;
end;

end.

在编译时,在SetLength行上出现以下错误:

[dcc32错误] uMyArray.pas(18):E2008不兼容的类型

lugogogo 回答:将Append方法添加到通用TArray类型

您无法调整开放数组参数的大小。您需要通过TArray<T>

更改

class procedure Append<T>(var AValues: array of T; const AItem: T); static;

class procedure Append<T>(var AValues: TArray<T>; const AItem: T); static;
本文链接:https://www.f2er.com/2520370.html

大家都在问