数组 – 为什么我不能返回任意数组的字符串？

编译器允许我执行以下操作：

procedure MyProc(const ADynData: array of string);

要么

procedure MyProc(const ADynData: TStringDynArray);

并传递任意数据,如下所示：

MyProc(['Data1','Data2']);

但是,不会允许

function MyFunc: TStringDynArray;
....
function MyFunc: TStringDynArray;
begin
    Result := ['Data1','Data2'];
end;

要么

function MyFunc: TStringDynArray;
const
    CDynData: array[0..1] of string = ('Data1','Data2');
begin
    Result := CDynData;
end;

为什么是这样？从技术上讲这不是一回事吗？

对于这些特定场景,返回任意数组字符串的建议(和最有效)方法是什么？

解决方法

不,这不是一回事.在

procedure MyProc(const ADynData: array of string);

参数是open array parameter,与“普通”动态数组不同. [..]语法只能用于在函数的开放数组参数中创建开放数组. (否则,[..]用于在代码中指定集合,例如Font.Style：= [fsBold,fsItalic].但是sets只能将序数类型作为其“基类型”,因此仍然没有’字符串’.)

换句话说,就像在第二个代码片段中尝试一样,无法在代码中编写动态数组,

function MyFunc: TStringDynArray;
begin
  result := ['Data1','Data2']; // Won't work.
end;

但是,在Delphi的新版本中,几乎可以：

type
  TStringDynArray = array of string;

function MyFunc: TStringDynArray;
begin
  result := TStringDynArray.Create('A','B');
end;

最后,

function MyFunc: TStringDynArray;
const
  CDynData: array[0..1] of string = ('Data1','Data2');
begin
  result := CDynData;
end;

因为TStringDynArray是dynamic array,而CDynData是static array,它是两种不同的基本类型.