$lstbox->bind( '<ButtonRelease-1>' =>\sub{ $lstbox->Subwidget("listbox")->focus() });
$lstbox->bind( '<Delete>' => \&Deltxt );