熟悉Treeview(.data属性)的高手请进!!!!

Billy_Chen28 2002-02-07 09:28:06
小弟在使用TTreeview时用到DATA属性两次,但在新建结点后输入DBMEMO字段数据总报错‘一些值可能在最后改变’,我想可能是不是DATA有问题,不知怎么解决。
  在建树和增加接点时都用到了DATA。
以下是我生成节点时用到的代码
tmpNode:=RzTreeView1.Selected;
pData:=tmpNode.Data;tmpNode:=RzTreeView1.Items.AddChild(tmpNode,inputstring);
RzTreeView1.Selected.Expand(true);
ADOTable1.Insert;
ADOTable1.FieldByName('name').Asstring := tmpNode.Text;
ADOTable1.FieldByName('parent').AsInteger := tmpparent;
ADOTable1.FieldByName('level').AsInteger := tmplevel+1;
ADOTable1.FieldByName('desc').Asstring :=RzDBMemo1.Text;
ADOTable1.Post;
new(pData);
pData^.ID:=ADOTable1.FieldByName('id').value;
tmpNode.Data:=pData;
请教高手了
...全文
93 2 打赏 收藏 转发到动态 举报
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
Billy_Chen28 2002-02-07
  • 打赏
  • 举报
回复
哪一行?
cobi 2002-02-07
  • 打赏
  • 举报
回复
你的错误在那一行语句中发生的

5,939

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧