IUnknown(TVarData(Params[0]).VPointer) as Range 修改成 IUnknown(TVarData(Params[0]).VPointer) as WOrd_TLB.Range {const Range},co