funcion que me regresa un arreglo

[ecfisa]

Hola julyus.

Primero te comento que las funciones declaradas así:

Código Delphi [-]
function TFMListenerService.SearchEvents( NewEventlistArray: TEventslistArray);

te van a dar error de sintáxis. Tendrías que declararlas así:

Código Delphi [-]
function TFMListenerService.SearchEvents( NewEventlistArray: TEventslistArray): Resultado;

Ahora, si lo que enviás es un arreglo de strings y la función devuelve el mismo arreglo modificado, me parece,
que te conviene usar TStrings.

Por ejemplo esta función te devuelve los strings sin el primer caracter:

Código Delphi [-]
function TForm1.FuncionDemo(Lista: TStrings): TStrings;
var
  i: Integer;
begin
  for i:= 0 to Lista.Count - 1 do
   Lista[i]:= Copy(Lista[i],2,Length(Lista[i]));
  Result:= Lista;
end;

Un ejemplo de llamada:

Código Delphi [-]
var
  Ts: TStrings;
begin
  Ts:= TStringList.Create;
  try
    Ts.Add('Uno');    
    Ts.Add('Dos');
    Ts.Add('Tres'); 
    Ts:= FuncionDemo(Ts);
    ListBox1.Items:= Ts;
  finally
    Ts.Free;
  end;

Espero que sea eso lo que andas buscando...

Saludos.