模块必须注册自己的 SubjectIDs ，它应该能够通过 Add [...] SUPER^.Learn(itfSubjectToLearn := itfSubjectTo