параметр поумолчанию = Null Overrload
У вас не реализован функционал для addmethod - параметр по умолчанию variant = null
и overrload для одинаковых названий функций процедур
и overrload для одинаковых названий функций процедур