Listbox özelliklerini basit bir örnekle anlatım.

procedure TForm1.Button1Click(Sender: TObject);
begin
listbox1.items.add(edit1.text);
end;

procedure TForm1.ListBox1Click(Sender: TObject);
var
i:integer;
begin
i:=listbox1.ItemIndex;
edit2.text:=listbox1.Items[i];
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
listbox1.DeleteSelected;
end;

procedure TForm1.Button3Click(Sender: TObject);
var
i:integer;
begin
for i:=0 to listbox1.Count-1 do
 begin
  if listbox1.Selected[i] then
  listbox2.items.add(listbox1.items[i]);

 end;
 listbox1.DeleteSelected;
end;

end.