100求如何创建带有interface的类

Question

unit AISMPooler;interfaceuses
  ComObj, ActiveX, AISMSvr_TLB, StdVcl, Classes, Windows, SyncObjs, VclCom,
  DataBkr, DBTables, Bde, SysUtils, ComServ;type
  TAISMPooler = class(TComponent, IPooler)
  private  protected
    class procedure UpdateRegistry(Register: Boolean;
      const ClassID, ProgID: string); override;
  end;
要求生成如上代码的样式，在AISMSvr_TLB对IPooler接口函数属性等的操作能直接对该单元进行更新！

Answer 1

没明白，不过你要想自动更新，可以试一试ModelMaker的自动功能。