Problem mit dyn. Arrays bei Übergabe an Funktion

[kalmi01]

Hallo,
warum bekomme ich bei diesem Konstrukt die Fehlermeldung: Inkompatible Typen ?

In Unit 1 steht folgendes:

Delphi-Quellcode:

implementation
  {$R *.dfm}

  uses
    unit2;

  procedure TForm1.Button1Click(Sender: TObject);
    var
      UpdateListFile : array of string;
    begin
      if Check4UpdateList(UpdateListFile)
      then  Edit1.Text := 'OK';
    end;

end.

In Unit 2 steht folgendes:

Delphi-Quellcode:

unit Unit2;

interface
  function  Check4UpdateList(UpdateListFile : array of string) : boolean;


implementation
  function  Check4UpdateList(UpdateListFile : array of string) : boolean;
    begin
      SetLength(UpdateListFile, 1);  // hier gibts den Fehler
      Result := true;
    end;

end.

Würde mich mal interessieren, wo mein Denkfehler liegt.
Gruß
Michael