tsdima, ну хорошо. В таком случае как ты собираешься извещать ClassObject о невалидном более указателе на объект? Еще одну точку ##clear делать или вводить указатель специального типа (nil, NULL...) для подачи на ##set
------------ Дoбавленo:

пример из пакета отображает только первую добавляемую фигуру.
зачем создается объект базового класса?