Problem mit SetLength

[gangs-taas]

Hey,
ich hab ein Problem mit Setlength was ich überhaupt nicht versteh,
ich vermute aber ihr werdet mir wiedermal nach einem Blick sagen könn wo dran es liegt
ich hab das hier gemacht :

Delphi-Quellcode:

 procedure Element_hinzufügen(Text : String; var Liste : Array of String);
    var
      y : integer ;
    begin
      y := Length(Liste);
      SetLength(Liste,y+1);
      Liste[y-1] := Text
    end;

ich bekomme nun aber in der Zeile "Liste := SetLength(Liste,y+1);" den Fehler [Pascal Fehler] U_Daten_Verarbeiten.pas(114): E2008 Inkompatible Typen

wisst ihr wodran das liegt ?

ich hab doch y als integer definiert und laut delphi-hilfe müsste die neue Länge ein Integerwert sein

das ist doch gegeben oder nicht ?!