Miscellany

if (object_type == sCHost)			 {				 CHost *obj = new CHost(this);			     obj->Serialize(pArchive);					 if (object_type!=class_type)				  delete obj;				 else				 {//...вызов коллбэк функции//				 }			 }		//это CHostGroup			if (object_type == sCHostGroup)			 {				 CHostGroup *obj = new CHostGroup(this);				 obj->Serialize(pArchive);				 if (object_type!=class_type)				  delete obj;				 else				 {//...вызов коллбэк функции//				 }			 }        //это CTaskSheduler			 if (object_type == sCTaskSheduler)			 {				 CTaskSheduler *obj = new CTaskSheduler(this);				 obj->Serialize(pArchive);				 if (object_type!=class_type)				  delete obj;				 else				 {//...вызов коллбэк функции//				 }