Implement Clear() function to delete the pointed-to TPulseIslands contained in this object. Previously just use the Inherited TObject::Clear() which is a no-op.

This is needed for the offline where the branch filling creates TPulseIslands implicitly, that the object should own.  Obviously, if you are in a situation where something else will delete the pointed-to TPulseIslands, you should not call this.