procedure RemoveByIndex(const Index: Integer);