Einzelnen Beitrag anzeigen

Benutzerbild von X-Dragon
X-Dragon

Registriert seit: 14. Jan 2003
Ort: Schortens
289 Beiträge
 
Delphi 6 Enterprise
 
#1

Fehler beim Dynamischen Array?

  Alt 4. Jun 2003, 17:08
In meinem Programm erhalte ich immer einen Speicherfehler, aber was ist da falsch?

Delphi-Quellcode:
var
  anz : Integer;
  ObjList : array of TMeinObjekt;
/...
  for i := 0 to MeineObjektListe-1 do
  begin
    obj := TMeinObjekt(MeineObjektListe.Objects[i]);
    if obj.xyz := 'xyzthen
    begin
      Inc(anz);
      SetLength(ObjList, anz);
      ObjList[anz-1].Assign(objsuch); // hier tritt der Fehler auf ...
    end;
  end;
... er bricht er also schon vor Abarbeitung der Assign-Prozedur ab (=kopieren der Inhalte von einem Objekt ins andere).
  Mit Zitat antworten Zitat