[ruina]

si tienes multiselect en el listbox necesitaras algo como:

Código Delphi [-]
    for i:=0 to ListBox1.Items.Count-1 do
        ListBox1.Selected[i]:=false;