- Fixed TWorldItem.Delete freeing itself
- Fixed order in which statics get deleted (first call item.Delete THEN delete it from the objectlist which will free the item)
This commit is contained in:
parent
01e7b98a12
commit
b90ea02421
|
@ -159,7 +159,6 @@ begin
|
||||||
FOwner.Changed := False
|
FOwner.Changed := False
|
||||||
else if Assigned(FOrgOwner) and (not FChanged) then
|
else if Assigned(FOrgOwner) and (not FChanged) then
|
||||||
FOrgOwner.Changed := True;
|
FOrgOwner.Changed := True;
|
||||||
Free;
|
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TWorldItem.DoChanged;
|
procedure TWorldItem.DoChanged;
|
||||||
|
|
Loading…
Reference in New Issue