ListBox1.DeleteSelected;
if (lParam = Button3) and (HiWord(wParam) = BN_CLICKED) then begin ListBox1.DeleteSelected; end