if ListBox1.itemindex<>-1 then
    Listbox1.Items.Delete(ListBox1.itemindex);
就好了!