MaskEditImpl1.pas 中    TMaskEditX = class(TActiveXControl, IMaskEditX) 大概是真正的类的定义,功能都写在这儿。而
MaskEditXControl1_TLB.pas中
    TMaskEditX = class(TOleControl) 估计是对真正类的包装,他只是用来描述接口。呵呵,只是猜想,谁知道究竟是什么意思?

解决方案 »

  1.   

    *_tlb.pas是类型库,delphi翻译过来的,这里的定义其实是库里的com对象的翻译,所以并不是真正的定义。单元MaskEditImpl1.pas里才是实用类来封装接口的地方,
    你的定义/动作都在这了。 
      

  2.   

    >> MaskEditImpl1.pas 中自动生成如下定义:
    >>    TMaskEditX = class(TActiveXControl, IMaskEditX)
    表明这个ActiveX控件从哪里继承,使用的哪个接口,你的代码放在这个类里,符合delphi中自定义类的声明和使用标准>>而在MaskEditXControl1_TLB.pas中有如下定义:
    >>    TMaskEditX = class(TOleControl)
    表明该类以什么类型封装,是完全自动产生的,符合delphi内部类的封装标准,内容会在每一次type library被重新编辑或刷新或重构,任何手工添加的将会自动清除