2D Array als übergabeparameter

[Cyberbob]

du kannst den Datentyp TMeinArray auch als Rückgabetyp deklarieren. Oder du setzt die Parameter in der Funktion als Var-Parameter und kannst sie dann in der funktion für das ganze Programm ändern.

Ersteres:

Delphi-Quellcode:

function myFunction(param: TmyArray) : TmyArray; 
begin
  ...
  result := param;
end;

procedure TForm1.Button1Click(Sender: TObject)
var
  a, b : TmyArray
begin
  SetLength(a, 2);
  SetLength(b, 2);
  a[0] := 'Wupp';
  a[1] := 'di';
  b := myFunction(a);
end;

Letzteres:

Delphi-Quellcode:

function myFunction(var param: TmyArray) : TString; 
begin
  param[0] := 'Wuppdi';
end;

procedure TForm1.Button1Click(Sender: TObject)
var
  a : TmyArray
begin
  SetLength(a, 1);
  a[0] := 'Hallo Welt';
  myFunction(a);
  ShowMessage(a[0]);
end;

Nicht ausprobiert, sollte so aber gehen!