1- und 2 Dimensionales Array vergleich

[raddi]

Hallo

Folgendes problem: Ich habe zwei Arrays, ein 1-dimensionales und ein 2-dimensionales. Das 2-dim. soll mehrere 1-dim. Arrays speichern können.
Es soll diese 1-dim. Arrays aber nur speichern, wenn sie nicht schon in diesem Array vorhanden sind, also doppelte Einträge sollen vermieden werden.
Dazu habe ich jetzt folgenden Code:

Delphi-Quellcode:

type
  TBooleanDynArray = array of boolean;

var
  kaufband: TBooleanDynArray;
  kaufbaende: array of TBooleanDynArray;

...

  H:=0; //Anzahl der mögl. Ausgaben

  SetLength(kaufband,bI+1);  //bI ist eine Konstante
  for i:=1 to bI do begin
    kaufband[i]:=false;
  end;

...

  ausgabe:=true;  //Gehe davon aus, dass neuer Eintrag gefunden wurde
  for h:=0 to H-1 do begin
    if kaufbaende[h]=kaufband then begin //Ich denke hier liegt das Problem
      ausgabe:=false;  //Wenn Eintrag schon existiert, dann kein neuen Eintrag gefunden
    end;
  end;
  if ausgabe then begin
    inc(H);
    SetLength(kaufbaende,H);
    SetLength(kaufbaende[H-1],bI+1); 
    for i:=1 to bI do begin
      kaufbaende[H-1,i]:=false;
    end;
    kaufbaende[H-1]:=kaufband;
  end;

So ich hoffe ihr könnt mir helfen, weil ich versteh wirklich nicht, warum dabei immer ein Zugriffsfehler erscheint.

Danke schonmal für eure Bemühungen
und seid nicht so streng mit mir ich bin NewBee in Delphi.

DankE!