您所在位置：主题：建立新的节点-----判断Level
znkevin
[专家分：0] 发布于 2006-05-08 16:43:00
begin
with tform2.Create(application) do begin
try
showmodal;
finally
if modalresult = mrOK then begin
new(MyRecordpointer);
with treeview1.Items.AddChild(treeview1.selected,Editname.Text) /*这里我想问，原来的代码建立节点好像只能在目前鼠标选取的节点下建立子节点，但是，我想要改成判断，就是在selected.level＝0的时候创建子节点，在level<>0的时候就创建同一级别的节点，这样应该怎么修改代码*/
do begin……
例如，我本来建立节点时可以这样写：
if treeview1.selected.level=0 then treeview1.items.addchild(treeview1.selected,新节点);
if treeview1.selected.level<>0 then treeview1.items.add(treeview1.selected,新节点)；
但是现在建立节点的代码是在with里面，我就不知道怎么修改了。。。
with tform2.Create(application) do begin
try
showmodal;
finally
if modalresult = mrOK then begin
new(MyRecordpointer);
with treeview1.Items.AddChild(treeview1.selected,Editname.Text) /*这里我想问，原来的代码建立节点好像只能在目前鼠标选取的节点下建立子节点，但是，我想要改成判断，就是在selected.level＝0的时候创建子节点，在level<>0的时候就创建同一级别的节点，这样应该怎么修改代码*/
do begin……
例如，我本来建立节点时可以这样写：
if treeview1.selected.level=0 then treeview1.items.addchild(treeview1.selected,新节点);
if treeview1.selected.level<>0 then treeview1.items.add(treeview1.selected,新节点)；
但是现在建立节点的代码是在with里面，我就不知道怎么修改了。。。
