非COM环境下的接口编程--问题，技巧，应用（二）[4]

    constructor create;

    function createafoo:ifoo;

    procedure delafoo(id:integer);

    function getfoonum:integer;

    function getfoobyid(id:integer):ifoo;

  public

    destructor destroy;override;

 end;

var

 fooman:tfoomanager;

implementation