$ic->Tk::bind('<1>',[$ic,'Tk::focus']);