求教关于TREE控件遇到的问题 - 编程论坛

#2

fanjinyu91082022-09-16 18:36

该程序装了上是十几台电脑都没有问题，今天安装到了联想电脑上，没想到出了问题，还不知怎么解决，我把系统重新安装了一遍，问题还是不能解决。

#3

csyx2022-09-16 20:36

错误信息已明确指出是代码逻辑错误，该错误是因为下图红线所指定的父节点尚不存在，自然不允许创建它的子节点

只有本站会员才能查看附件，请登录

#4

sam_jiang2022-09-16 20:52

你这代码其他电脑上能运行吗？看错误提示好像是参数不正确呢。

#5

sam_jiang2022-09-16 20:54

以下是引用fanjinyu9108在2022-9-16 18:23:41的发言：

我使用的TREE空间在很多电脑上使用都很正常，但是今天却遇到了问题，我先在电脑上安装VFP,然后执行程序，遇到如下问题：
，请问怎么解决？

变量用中文，人才

#6

cssnet2022-09-16 21:05

是标准的mscomctl.ocx吗？还是第三方ocx？

#7

csyx2022-09-16 21:10

变量用中文，用第三方ocx，这些都不是问题
截图展示的是楼主看穿越剧看多了，不按套路出牌，竟然安排儿子先于父亲降世

#8

cssnet2022-09-16 22:46

以下是引用csyx在2022-9-16 21:10:55的发言：
用第三方ocx，不是问题

亲，别忘了，我是一只老狐狸——我既问出这个问题，自然是埋了有天大的陷阱在里头。

#9

fanjinyu91082022-09-17 10:07

该程序我再说明一下，该程序在许多电脑都运行正常，父对象是表中的一个字段，我再发2张图

只有本站会员才能查看附件，请登录

#10

cssnet2022-09-17 10:49

以下是引用fanjinyu9108在2022-9-17 10:07:37的发言：
该程序我再说明一下，该程序在许多电脑都运行正常……

呵呵，我当然知道“该程序在许多电脑都运行正常”，也绝不置疑。
不过你仍未回答我的问题：
是标准的mscomctl.ocx吗？还是第三方ocx？
——这问题其实很关键的，亲。

#11

fanjinyu91082022-09-17 10:57

我安装了VFP,应该有标准的mscomctl.ocx，但同时也下载了mscomctl.ocx文件，放在运行程序的文件夹里面。

#12

fanjinyu91082022-09-17 11:11

请问我现在怎么做，把系统重新安装一遍可以吗？

#13

csyx2022-09-17 12:40

很简单，把已加载过的节点key记录下来，出错时检查记录中是否存在这个节点的父key

程序代码：

...

StrToFile('', 'key.txt', 0)
Scan
    If 父对象=0
        oo = This.Nodes.Add(,,'N'+ALLTRIM(STR(键值)),ALLTRIM(名称))
    Else
pkey = 'N'+ALLTRIM(STR(父对象))
        oo = This.Nodes.Add(pkey,4,'N'+ALLTRIM(STR(键值)), ALLTRIM(名称))
    EndIf
StrToFile(oo.key+chr(13), 'key.txt', 1)

    ....

EndScan

[此贴子已经被作者于2022-9-17 12:51编辑过]

#14

cssnet2022-09-17 18:39

以下是引用fanjinyu9108在2022-9-17 10:57:46的发言：
我安装了VFP,应该有标准的mscomctl.ocx，但同时也下载了mscomctl.ocx文件，放在运行程序的文件夹里面。

唉，你仍是未准确回答我的问题：
换一种问法吧：
你用的Treeview控件，究竟是微软标准Treeview控件5.0还是6.0？

#15

fanjinyu91082022-09-17 21:51

问题的原因找到了，是某个用户名的权限设置出了问题，换一个用户名就正常了，非常感谢各位老师的解答。

#16

shenlancwz2022-10-07 16:56

看到用中文变量的就感觉有些菜，还有那些喜欢用中文做字段名、数组变量名、文件名、过程名、表单名等等等。

[此贴子已经被作者于2022-10-7 17:00编辑过]