¿Cómo devolver una matriz desde una función Delphi?

Question

Tengo una función en mi aplicación que necesita devolver una matriz. He encontrado en un par de lugares cómo hacerlo al declarar el tipo de matriz, p.

type 
    TStringArray = array of string; 

Y luego declarar mi función

function SomeFunction(SomeParam: Integer): TStringArray; 

Mi problema es tratar de configurar esto en un formulario que tiene interfaz y la implementación. ¿Cómo declaro mi tipo y tengo una declaración de función con ese tipo en la interfaz?

Answer 1

unit Unit1; 

interface 

uses SysUtils; 

type 
    TStringArray = array of string; 

function SomeFunction(SomeParam: integer): TStringArray; 

... 

implementation 

function SomeFunction(SomeParam: integer): TStringArray; 
begin 
    SetLength(result, 3); 
    result[0] := 'Alpha'; 
    result[1] := 'Beta'; 
    result[2] := 'Gamma'; 
end; 

... 

end. 

La regla de oro es que la sección de interfaz de una unidad se describen los tipos de datos utilizados por la unidad, y los tipos, clases y funciones (sus firmas) que residen en la unidad. Esto es lo que todas las unidades otras ven. La sección de implementación contiene la implementación de las clases y funciones. Esto no es visible para unidades adicionales. Otras unidades deben preocuparse por la interfaz de la unidad, el 'contrato' firmado por esta unidad y la unidad externa, no los 'detalles de implementación' que se encuentran en la sección de implementación.

Answer 2

Si Delphi es bastante reciente, no necesita declarar un nuevo tipo, declarándolo como TArray<String>.

Ejemplo copiado y pegado de la respuesta anterior:

unit Unit1; 

interface 

function SomeFunction(SomeParam: integer): TArray<String>; 

implementation 

function SomeFunction(SomeParam: integer): TArray<String>; 
begin 
    SetLength(result, 3); 
    result[0] := 'Alpha'; 
    result[1] := 'Beta'; 
    result[2] := 'Gamma'; 
end; 

end.