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 := 'xyz' then
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).