dynamisches Array an Prozedur übergeben

[Antigo]

Hi,
ich möchte ein dynamisches (Integer) Array an eine Prozedur übergeben, da ich beim aufruf der prozedur noch nicht weiss wieviele ergebnisse ich bekomme. Ich möchte dann abhängig davon die Größe des dyn. Arrays festlegen und die Werte dareinschreiben.

Delphi-Quellcode:

    procedure calcpos(s:string;var ps:array of Integer);
...

procedure TForm1.calcpos;
var i:integer;
begin
  setlength(ps,i);
end;

leider funktioniert das so nicht. Der COmpiler spricht von inkompatiblen Typen. Sehe ich das richtig, dass man per Call by reference übergebene dyn. Arrays nicht in ihrer Größe verändert darf? Dann müsste ich das Array global machen :/

danke schonmal

[Matze]

Hi,

du musst dafür einen Typ nutzen:

Delphi-Quellcode:

type
  TArray: array of Integer;

...

procedure calcpos(s: string; var ps: TArray);