Código Delphi [-] var i: integer; begin for i:= 0 to Listbox1.Items.Count - 1 do if Listbox1.Selected[i] then begin // Aqui lo que quieras end; end;
var i: integer; begin for i:= 0 to Listbox1.Items.Count - 1 do if Listbox1.Selected[i] then begin // Aqui lo que quieras end; end;