Arry of Boolean = funkzt nicht

[Master_BB]

ich kriegs nicht gebacken
kann nicht einer mal meines korriegiert posten? brauch diese funktion sonst komm ich nicht weiter.

Delphi-Quellcode:

type TBla = class
  private
    FPathChecked  : TBoolArray;
    procedure SetPathChecked(const Value: TBoolArray);
  public
    property PathChecked  : TBoolArray       read FPathChecked    write SetPathChecked;
  end;


procedure TPathItem.SetPathChecked(const Value: TBoolArray);
begin
  SetLength(FPathChecked, Succ(Length(PathChecked)));
  FPathChecked := Value;
end;

greetz