Eine Function ein Array liefern lassen

[mojo777]

Hallo, ist es eigentlich in delphi möglich eine funktion ein array liefern zu lassen?
bisher habe ich immer irgendeine notlösung entwickelt, doch vielleicht weiss jemand rat.

also ich meine soetwas wie function gibmirfive (variable:String):array of Integer; denke im voraus.

mojo

[ste_ett]

Erstelle dir einfach einen neuen Typ.

Delphi-Quellcode:

type
  TMyIntArary: array of Integer;

und dann

function gibmirfive (variable:String): TMyIntArray;

[mojo777]

ahaaahh!!
ok danke!

[ste_ett]

Bei Rückgabe von Arrays durch Funktionen ist es nicht garantiert, dass der Speicherbereich, in dem der Array liegt, unberührt bleibt, da dieser nach Beenden der Funktion wieder von anderen Programmteilen nutzbar ist.

Besser wäre da:

Delphi-Quellcode:

procedure gibmirfive (variable:String; var MyIntArray: array of integer);

Aufruf per:

gibmirfive('String', ArrayName);

statt

ArrayName := gibmirfive('String');

[mojo777]

ja. das ist dann aber wieder die art der notlösung, die ich bisher benutzt habe. quasi eine aussen leigene variable als array in der procedure bearbeiten und dann von woanders verweden...
aber klappt es denn auch wenn der zugriff units/classen übergreifend erfolgt?

[ste_ett]

Warum sollte das nicht gehen?

[Airblader]

@ste_ett

Kenne mich nun nciht so aus, aber:

Angenommen ich gebe TMyIntArray zurück.
Gut, vielleicht wird es dann überschrieben, aber einmal wird es ja 100% zurückgegeben, sonst könnte bei jeder Rückgabe ja Fehler entstehen.

Wenn ich dann MyArray := GiveMeTheArray(xxx); mache, wird die Rückgabe ja sowieso einem neuem Array ( MyArray ) zugestellt und somit ist es ja egal, ob die Rückgabe wieder überschrieben wird, oder?

air

[malo]

Zitat von Airblader:

@ste_ett

Kenne mich nun nciht so aus, aber:

Angenommen ich gebe TMyIntArray zurück.
Gut, vielleicht wird es dann überschrieben, aber einmal wird es ja 100% zurückgegeben, sonst könnte bei jeder Rückgabe ja Fehler entstehen.

Wenn ich dann MyArray := GiveMeTheArray(xxx); mache, wird die Rückgabe ja sowieso einem neuem Array ( MyArray ) zugestellt und somit ist es ja egal, ob die Rückgabe wieder überschrieben wird, oder?

air

Und was ist, wenn man die Werte auslesen will und mit einzelnen Werten arbeiten möchte? Also nicht mit dem ganzen Array, sondern nur mit einzelnen Indexen. Klar, man könnte dann natürlich das ganze Array vorher abspeichern, aber ist doch immer praktisch, wenn es ohne diesen Umweg ginge

[Airblader]

@malo

naja, aber wenn man eina rray zurückgibt muss man ja sowieso mit indexen arbeiten, oder halt die arrayelemente mit entspr. index in einer neuen variablen ablegen

[moritz]

Zitat von ste_ett:

Bei Rückgabe von Arrays durch Funktionen ist es nicht garantiert, dass der Speicherbereich, in dem der Array liegt, unberührt bleibt, da dieser nach Beenden der Funktion wieder von anderen Programmteilen nutzbar ist.

Besser wäre da:

Delphi-Quellcode:

procedure gibmirfive (variable:String; var MyIntArray: array of integer);

Aufruf per:

gibmirfive('String', ArrayName);

statt

ArrayName := gibmirfive('String');

Falsch. In der Funktion, die diese Funktion aufruft, ist für die Rückgabevariable ja ein Speicher definiert. Und dieser bleibt erhalten.

Gruß