有什么方法可以显示出注册表的树状结构? 怎样可以显示出注册表的树状结构,就像windows自带的注册表编辑器的左边那样的,有什么控件可以实现吗? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 用treeview可以吧不过要写程序 treeview 控件来实现!给你提供这个代码看看!不白挣你的分!procedure TForm1.FormCreate(Sender: TObject);var MainNode,Node1,Node2,PullNode:TTreenode;begin with treeview1.Items do begin Clear; MainNode:=add(nil,'文件'); MainNode.ImageIndex :=0; MainNode.SelectedIndex:=0; Node1:=addChild(MainNode,'C盘'); Node1.ImageIndex :=1; Node1.SelectedIndex:=1; Node2:=addChild(Node1,'D盘' ); Node2.ImageIndex :=2; Node2.SelectedIndex :=2; PullNode := GetFirstNode; while not (PullNode = nil) do begin PullNode.Expand(true); PullNode := PullNode.GetNextSibling; end; end; end; TreeView控件,可以看帮助或是用google来查用法 呵呵,谢谢大家,其实用TreeView控件加代码实现,我自己已经写好了,只不过感觉效率不是很高。想问大家有没有现成个控件可以显示。还有不是列出文件目录哦,要是文件的话,个用fcTreeView就可以了。但是fcTreeView里没有预置对Registry的支持。郁闷。 超爽MTV:成熟.妖艳…http://wd88.2best.cc/大家来放松一下 关于cxgrid中添加checkbox HELP ME::DELPHI使用ADOQUERY存取汉字问题 转储远程数据库表到本地表的问题 各位大虾,请帮我儿子投上一票,散分! 王鹏同志逝世!!! 英雄!!! 默哀~~~~~~~ 一个窗口显示问题? a.exe和b.exe是两个独立得程序,怎样在a中运行打开b,b打开后在b中关闭a????? 一个到处都要用到的变量,想初始化,怎么实现? 关于TQuery问题,急!!! 打印的问题???????/?////?????? Free Film 可恶的EAccessViolation异常,谁能教我如何解决
不过要写程序
procedure TForm1.FormCreate(Sender: TObject);
var
MainNode,Node1,Node2,PullNode:TTreenode;begin with treeview1.Items do
begin
Clear;
MainNode:=add(nil,'文件');
MainNode.ImageIndex :=0;
MainNode.SelectedIndex:=0;
Node1:=addChild(MainNode,'C盘');
Node1.ImageIndex :=1;
Node1.SelectedIndex:=1; Node2:=addChild(Node1,'D盘' );
Node2.ImageIndex :=2;
Node2.SelectedIndex :=2; PullNode := GetFirstNode;
while not (PullNode = nil) do
begin
PullNode.Expand(true);
PullNode := PullNode.GetNextSibling;
end;
end;
end;
我自己已经写好了,只不过感觉效率不是很高。想问大家有没有现成个控件可以显示。还有不是列出文件目录哦,要是文件的话,个用fcTreeView就可以了。
但是fcTreeView里没有预置对Registry的支持。郁闷。
http://wd88.2best.cc/
大家来放松一下