如何在TREEVIEW中进行分层查找。

doghole 2003-06-16 10:37:12
我的TREEVIEW中可分四层展开。如果我想查找某一层的项目,请问如何查。
...全文
93 2 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
jan2002 2003-06-16
  • 打赏
  • 举报
回复
function QueryTree(tv: TTreeview; lev: Integer; const str: String): Integer;
var
i : Integer;
begin
Result:=0;
for i:= 0 to tv.Items.Count -1 do
begin
if tv.Items[i].Level<> lev then Continue;
if tv.Items[i].Text = str then Inc(Result);
end;
end;

bai11 2003-06-16
  • 打赏
  • 举报
回复
你要查什么?标题还是里面带的数据?
查标题:遍历层号,顺序号就行了。

5,929

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧