Wie krieg ich eine Referenz auf Array als Rückgabewert

[DelphiKlaus]

Hallo,

ich würd's so machen

Delphi-Quellcode:

type
  PMeinArray    = ^TMeinArray;
  TMeinArray    = Array [1..1000] of Irgendwas;

var
  MeinArray : PMeinArray;
  Loop      : Integer;

procedure HoleAdresse (MeinArray : PMeinArray);

begin
  MeinArray := @LokalesArray
end;

begin
  HoleAdresse (MeinArray);

  for Loop := 1 to 1000 do
    TuWasMitElement (MeinArray [Loop]^)
end.

So in etwa sollte es gehen

MfG

Klaus