Código Delphi [-]edit1.Text:=IntToStr(Listbox1.Items.count);
edit1.Text:=IntToStr(Listbox1.Items.count);