Array ohne typ, aber wie ?

[mimi]

ich habs jetzt so gemacht:

Delphi-Quellcode:

procedure DeleteArrayItem(liste:array of Variant; Index:Integer);
var
  i:Integer;
begin
  if Length(liste) -1 >= 1 then begin
    for i:=Index to HIGH(liste) do
      liste[i]:=liste[i+1];
    SetLength(liste,Length(liste)-1 );
  end;
end;

aber egal wie ich es mache: schreibe ich z.b. array of const bekomme ich immer den gleichen fehler bei setLength:[Fehler] Tools.pas(87): Inkompatible Typen

woran liegt das ????? was mache ich falsch !