
      PUBLIC
        <span style="color:navy"><b>CONSTRUCTOR</b></span> create (aowner: tcomponent); <span style="color:teal"><b>OVERRIDE</b></span>;
        <span style="color:navy"><b>DESTRUCTOR</b></span> destroy; <span style="color:teal"><b>OVERRIDE</b></span>;
        <span style="color:navy"><b>CLASS</b></span> <span style="color:navy"><b>PROCEDURE</b></span> addclient (const aactivator: tactivator;
                   const aclient: iobjectlink; var dest: tactivator);
        <span style="color:navy"