Código Delphi [-]listbox1.items:=listbox2.items listbox2.items.clear
listbox1.items:=listbox2.items listbox2.items.clear