Auf Dynamisches array zugreifen ohne AV?

[Luckie]

Delphi-Quellcode:

type
  TMyDynArray = array of Integer;

procedure Foo(Param: TMyDynArray);
var
  len: Cardinal;
begin
  len := length(Param);
  case len of
    1:;
    2:;
    3:;
  end;  
end;

Sprich: Übergib das Array als ganzes und werte es in der Prozedur aus.