listbox seleccionado o no?

[juaarias]

hola gente como va necesito una ayudin con listbox para saber si hay algun elemento seleccionado o no,con multiselct true y en false;desde ya gracias¡¡¡¡

[ecfisa]

Hola.

Podes hacer:

function HaySeleccion(AListBox: TListBox): Boolean;
var
i: Integer;
begin
Result:= False;
for i:= 0 to AListBox.Items.Count-1 do
if AListBox.Selected[i] then
Result:= True;
end;


Ejemplo de uso:

if HaySeleccion(ListBox1) then
...


Saludos.

[juaarias]

ahora molesto nuevamente, para obtener el indice de un elemento seleccionado en un listbox con multiselect en false, para luego agregar un elemento en otro listbox pero en esa posicion

[escafandra]

ListBox1.ItemIndex;

Saludos.