  <span style="color:navy"><b>PROCEDURE</b></span> setfirstclick (var ainfo: mouseeventinfoty);
        <span style="color:navy"><b>PROCEDURE</b></span> doactivate;
        <span style="color:navy"><b>PROCEDURE</b></span> dodeactivate;
        <span style="color:navy"><b>PROCEDURE</b></span> dofocus;
        <span style="color:navy"><b>PROCEDURE</b></span> dodefocus;
        <span style="color:navy"><b>PROCEDURE</b></span> dopaint (const canvas: tcanvas);
        <span style="color:navy"><b>PROCEDURE</b></s