Delphi Remove an object from a TObjectList

9
votes

I have a TObject list (FileEventObjects := TObjectList.Create(True);) containing one or more objects. The objects need to stay in the list until they are processed. (The object list exists for the duration of the application.)

I'm not entirely sure how to remove a processed object from the list.

Will the object be 'freed' if I do FileEventObjects.Delete(i)

Are there any links to useful examples of TObjectLists in action?

Regards, Pieter.

2
delphitobjectlist
If you're ever curious if an object is getting freed, add this line to the destructor: OutputDebugString('Freeing TMyclassName'); You will see it in the event log each time it's called. Or set a breakpoint in TMyclassName.Destroy. You can even turn on Fast MM's memory leak detector, and you'll get warned about objects that didn't get freed properly. - Warren P

2 Answers

14
votes

If you pass True to the TObjectList constructor (it is also True by default), the list frees any object as soon as you remove it from the collection, no matter if you use Delete, Remove or Clear.

Apart from this, TObjectList can be used just like TList.

5
votes

always remember to loop backwards like

for i := Pred(objectlist.Count) downto 0 do
begin
  objectlist.items[i].process;
  objectlist.delete(i);
end;

if you loop from 0 to count -1 whilst removing items you will get access violations