我安装了VFP,应该有标准的mscomctl.ocx,但同时也下载了mscomctl.ocx文件,放在运行程序的文件夹里面。
2022-09-17 10:57
2022-09-17 11:11
程序代码:...
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编辑过]
2022-09-17 12:40
2022-09-17 18:39
2022-09-17 21:51
[此贴子已经被作者于2022-10-7 17:00编辑过]
2022-10-07 16:56