一个有关listbox的小问题

Question

怎么实现这样的效果？就是在查找的时候，找到了那一条的记录，在listbox上显示记录里的一项内容，即listbox上面对应的那一项显黑？

Answer 1

ListView1.Items[Curindex].Selected:= true;这是listview的,你参照一下就可以了.

Answer 2

老兄说的是这个意思吗？
  ListBox1.ItemIndex := 1;// 1为要加亮的项

Answer 3

procedure TForm1.Button1Click(Sender: TObject);
var
 myIndex:integer;
begin
 myIndex:=ListBox1.Items.IndexOf(Edit1.Text);
 if myIndex<>-1 then ListBox1.Selected[myIndex]:=true;
end;

Answer 4

用indexof啊
  ListBox1.ItemIndex := ListBox1.Items.IndexOf('342');

Answer 5

来晚一步，不过要是想指定高亮度的颜色的话：
var
  MyRect;TRect;
begin
  ListBox1.canvas.brush;=clred;
  MyRect:=ListBox1.ItemRect (ListBox1.itemindex);
  ListBox1.Canvas.FillRect (MyRect);
end;