关于listview和treeview的编程

Question

listview1.Items.Item[i].Focused:=true; 
listview1.Items.Item[i].Selected:=true;
焦点到第i+1行。

Answer 1

  listview.items[itemindex];  treeview.level.nodes;  具体我来找个例子给你

Answer 2

to Kingron(戒网中……):能否讲详细一点？    to yexiao(叶开):你的方法好象不能够通过，不能够移动到想要的行上面，只是得到了焦点。

Answer 3

我的意思是： 我的listview控件中已填充入1万条记录，当我用程序查找listview中符合条件的记录后，将焦点设定到该记录，如何能够做到得到焦点记录能够显现在listview窗口中能够看的到？

Answer 4

你的意思是查找到想要显示的LISTVIEW然后显示，并且让它得到焦点？如果是这样的话看代码：
假如你想搜索EDIT1。TEXT中的数据
.......
var findItem:Tlistitem;
   ptr1,ptr2:Tpoint;
begin
findItem:=listview1.findcaption(0,Edit1.text,true,true,true);
  if findItem<>nil then
    begin
     ptr2:=listview1.topitem.position;
     ptr1:=findItem.getpostion;
     if ptr1>ptr2 then
      listview1.Scroll(0,(ptr1.y-ptr2.y))
     else 
      listview1.scroll(0,-(ptr2.y-ptr1.y))
     listview1.selected:=findItem;
     listview1.setfocus;
    end
  else showmessage('没有要查找的信息');
end; 
写了这么多给分吧！：）