给TreeView增加一个Item,并设置将其选中。
增加的Item其Parent是treeview1.topitem,值是delext(extractfilename(opendialog1.filename);
下面的语句等同:
s := delext(extractfilename(opendialog1.filename));
TreeItem := treeview1.Items.AddChild(treeview1.topitem, s);
treeItem.Selected := True;
增加的Item其Parent是treeview1.topitem,值是delext(extractfilename(opendialog1.filename);
下面的语句等同:
s := delext(extractfilename(opendialog1.filename));
TreeItem := treeview1.Items.AddChild(treeview1.topitem, s);
treeItem.Selected := True;
解决方案 »
- 能否通过进程ID找到窗口句柄。
- 用indy如何实现访问https的页面
- combobox的问题!combobox能不能有想.caption和.value这个样属性?谢谢
- 感谢S.F.(chinasf.cnblogs.com) ^_^
- 请教 关于在DELPHI 2005编写带HLP帮助文件的上下文敏感帮助的问题
- delphi xe2做的datasnap 三层,如何实现客户端的心跳。
- 问大哥们几个问题(关于mp3文件信息和磁盘信息的问题)
- 哪位有ehlib 2.6的源码(含dbgrideh.pas),200分相送
- 如何判断Treeview控件中节点是打开还是关闭状态
- 请问各位高手,delphi5.0能否做电子地图呢?
- 请问那里有spcomm下载??要确实能下的,深度历险不能下...
- 各位有没有真正发布过多层应用程序的?
var
tn: TTreeNode;
S: string;
begin
S := delext(extractfilename(opendialog1.filename));
tn := treeview1.Items.AddChild(treeview1.topitem,S);
tn.Selected := true;
end;