Dyn. Array als Parameter übergeben und in Prozedur vergrößer

[meisteralex]

Hallo ich habe folgende Prozedur:

procedure fill_container(var _edifactstring : string; _container : array of TContainer); und will nun innerhalb der Prozedur mit SetLength(_container,33); das Array vergrößern?
Warum geht das nicht ? => der Compiler meldet ungültiger Typ!

Falls das ganze nur über Zeigerarithmetik geht...wie kann ich ein dyn Array als Zeiger übergeben ?
aber normalerweise sollte ja auch in Delphi ein byRef - Prameter nur eine Kapselung der Zeigerarithmetik sein.

Naja bin auf die Antworten gespannt.

Danke im Vorraus

[SirThornberry]

du müsst für dein array of einen neuen Typen definieren und diesen dann verwenden.

[Blup]

Dieses Problem findet früher oder später jeden Delphianwender.
zum Verständnis:

Delphi-Quellcode:

var
  _container1: array of TContainer;
  _container2: array of TContainer;

"array of TContainer" ist jeweils eine eigenständige Typdeklaration.
Der Compiler interpretiert das so:

Delphi-Quellcode:

type
  Typ1 = array of TContainer;
  Typ2 = array of TContainer;

var
  _container1: Typ1;
  _container2: Typ2;

Die beiden Typen sind zwar auf gleiche weise deklariert, aber für den Compiler nicht identisch.
Eine Zuweisung von einer Variablen an die andere schlägt mit der Meldung "Inkompatible Typen" fehl.

Der Typ von Array-Variablen muss dazu explizit deklariert werden.

Delphi-Quellcode:

type
  TContainerArray = array of TContainer;

var
  _container1: TContainerArray;
  _container2: TContainerArray;

Die Prozedur sollte dann etwa so aussehen:
procedure fill_container(var _edifactstring : string; var _container : TContainerArray); Das var vor _container ist erforderlich, damit innerhalb der Prozedur nicht mit einer Kopie des Arrays gearbeitet wird.
Änderungen werden sonst außerhalb der Prozedur nicht sichtbar.
Das var vor _edifactstring ist nur dann sinnvoll, wenn innerhalb der Prozedur Änderungen an dieser Variablen vorgenommen werden und diese ebenfalls außerhalb der Prozedur sichtbar werden sollen.

[gammatester]

Zitat von Blup:

Dieses Problem findet früher oder später jeden Delphianwender.
zum Verständnis:

Delphi-Quellcode:

var
  _container1: array of TContainer;
  _container2: array of TContainer;

"array of TContainer" ist jeweils eine eigenständige Typdeklaration.

Darum geht es hier aber gar nicht, denn in der Deklaration
procedure fill_container(var _edifactstring : string; _container : array of TContainer); ist _container kein dynamisches Array sondern ein "Open array". Siehe Delphi-Hilfe (Open array parameters):

Zitat:

The syntax of open array parameters resembles that of dynamic array types, but they do not mean the same thing.

Gammatester

[Blup]

In diesem Anwendungsfall ist ein "Offener Array-Parameter" nicht die richtige Wahl.
Die Größe des Arrays soll innerhalb der Prozedur verändert werden.
Bei Übergabe eines dynamischen Arrays als var-Parameter ist das möglich.

[gammatester]

Zitat von Blup:

In diesem Anwendungsfall ist ein "Offener Array-Parameter" nicht die richtige Wahl.
Die Größe des Arrays soll innerhalb der Prozedur verändert werden.
Bei Übergabe eines dynamischen Arrays als var-Parameter ist das möglich.

Das ist zwar richtig, aber nichts neues: Siehe Sir Thornberrys Beitrag. Ich habe nur auf Deine falsche Erklärung für die Fehlermeldung des Kompilers hingewiesen.

Nix für ungut
Gammatester