Entwickler-Ecke :: Thema anzeigen - Dynamische Arrays Parameterübergabe

martin300 - Sa 04.04.09 12:13
Titel: Dynamische Arrays Parameterübergabe

Die Funktion "maches" soll als Ergebnis ein dynamisches Array liefern. Die Anzahl der Einträge wird in der Funktion dynamisch festgelegt.

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:

type
  ValueArray = Array of String;

  TForm37 = class(TForm)
  private
    { Private-Deklarationen }
  public
    procedure callmaches;
    function maches():ValueArray;
    { Public-Deklarationen }
  end;

Delphi-Quelltext

1:
2:
3:
4:
5:
6:

function TForm37.maches: ValueArray;
begin
  setLength(ValueArray,1);
  ValueArray[0] := 'Eintrag0';
  result:= ValueArray;
end;

Mein Problem liegt in der Festlegung der Länge von Array "ValueArray". Es würde funktionieren, wenn die Definition innerhalb der Funktion steht, nur so klappt die Rückgabe nicht.

dummzeuch - Sa 04.04.09 12:23

Das sollte funktionieren:

Delphi-Quelltext

1:
2:
3:
4:
5:

function TForm37.maches: ValueArray;
begin
  setLength(Result,1);
  Result[0] := 'Eintrag0';
end;

twm

JayEff - Sa 04.04.09 16:36

dummzeuch hat folgendes geschrieben :

Das sollte funktionieren:

Delphi-Quelltext

1:
2:
3:
4:
5:

function TForm37.maches: ValueArray;
begin
  setLength(Result,1);
  Result[0] := 'Eintrag0';
end;

:nixweiss:

martin300 hat folgendes geschrieben :

Mein Problem liegt in der Festlegung der Länge von Array "ValueArray". Es würde funktionieren, wenn die Definition innerhalb der Funktion steht, nur so klappt die Rückgabe nicht.

Falsch, du versuchst einem Datentyp Werte zuzuweisen. Du kannst nur Variablen Werte zuweisen. Kannst ja auch nicht schreiben Integer := 5; ;)

Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2026 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!