设置TreeView的DragMode = dmAutoMatic

procedure TFmMain.TreeLeftDragOver(Sender, Source: TObject; X, Y: Integer;
  State: TDragState; var Accept: Boolean);
begin
  Accept := False ;
  //if (source is TTreeNode) or (Source is TListItem) then
  if (source is TTreeView) or (source is TListview) then
    Accept := true ;
end;

procedure TFmMain.TreeLeftDragDrop(Sender, Source: TObject; X, Y: Integer);
var
  tSrcNode ,tDesNode: TTreeNode ;
  tSrcID ,tDesID : Integer ;
  sSql : String ;
  lSrcItem : TListItem ;
begin
  tSrcID := 0 ;tDesID := 0 ;
  tDesNode := TTreeview(Sender).GetNodeAt(X,Y);
  if Source is TTreeview then
  begin
    TTreeview(Sender).Items.BeginUpdate;
    tSrcNode := TTreeview(Source).Selected ;
    tSrcNode.Moveto(tDesNode,naAddChild);
    TTreeview(Sender).Items.EndUpdate;
  end
end;

转载于:https://www.cnblogs.com/hnxxcxg/archive/2008/04/05/2941040.html

TreeView 之间节点拖动 /移动相关推荐

  1. TreeView查获节点并选中节点

    TreeView查获节点并选中节点如果有多个节点则会继续查找下一个节点 支持关键字搜索 private void SearchNodes(string SearchText, TreeNode Sta ...

  2. 案例 TreeView动态控制节点 c# 1614264758

    案例 TreeView动态控制节点 c# 1614264758 需求一 添加节点与子节点 需求二 删除与清空节点

  3. 拓扑图节点拖动的实现(学习笔记)

    需求: 拓扑图的节点可以拖动 当有警报时,在节点上需要提示,直至警报解除 拓扑图所在的窗口可以变动大小.当缩小主窗口,拓扑图显示不下时,需要出现滚动条,此时拖动icon到拓扑图边缘,滚动可以跟随移动. ...

  4. .net C# Treeview的Node拖动,Node节点上下移动

    原文出处:http://blog.csdn.net/yanleigis/archive/2007/10/10/1818293.aspx 定义一个TreeView 名字为TVdepartment,设置a ...

  5. 遍历Treeview每个节点并初始化(C#)

    搞了好久,哎,C#的一些控件用起来还没习惯,所以折腾啊. TreeView的形成,必然要初始化,数据记录是从数据库中取得的,那么要先取再遍历.介绍下心得吧. 首先,数据预期显示结果如下 其次,数据库结 ...

  6. 使用递归方法遍历TreeView的节点如配置则勾选

    自己在网上找了一段时间都没有找到取自数据库的值与TreeView中的节点值进行对比如匹配则勾选中CheckBox的资料,后面自己写了一个递归方法实现,现在记录起来以备需要时使用.在没写这递归方法前如果 ...

  7. 双击treeView的节点时使不展开不折叠子节点

    有时候我们对树控件的双击默认操作不太满意,比如我们在双击一有子节点的节点的时候不希望打开或关闭它的子节点而想执行一个特定的操作,这时怎么来写呢,我这里有一个办法可以做到这一点: using Syste ...

  8. kendo treeview 修改节点显示值_VBA学习笔记60-1: Treeview控件

    学习资源:<Excel VBA从入门到进阶>第60集 by兰色幻想 本节讲Treeview控件. TreeView控件是以树形结构显示数据的控件.利用TreeView控件,可以设计出树形结 ...

  9. treeview找到节点并展开_我们从100个经典韩剧中,找到8个「神套路」,这样写抖音剧本个个都是爆款!...

    在之前的文章中我们讲到过,抖音的厉害之处,在于它将其他平台5分钟甚至更长的"短视频",浓缩到1分钟.15s. 通过快速呈现精华内容,抖音在「视觉冲击」上对其他视频平台实施了一波降维 ...

最新文章

  1. Android Webview H5 秒开方案实现
  2. 使用Fiddler解析WCF RIA Service传输的数据
  3. 镜像镜像–使用反射在运行时查看JVM内部
  4. php多条件筛选顺序_php多条件组合筛选
  5. excel和python建模_利用Excel学习Python:准备篇
  6. 工作153:position使用
  7. android 创建文件夹_Android 动画小记
  8. C++重载函数和重载运算符
  9. JeecgCloud 微服务开发平台-部署文档
  10. 关于ARCGIS SERVER 9.3的ArcGIS Server Manager出现“/”应用程序中的服务器错误
  11. 体验VMware Converter Client 6.2与Veeam BR 10迁移ESXi 6.0 vm到vCenter 6.7 u3
  12. 阿里云前端周刊 - 第 37 期
  13. 按住滑块 拖拽验证html5,【原生】JavaScript 实现滑动拖动验证
  14. ## Manjaro的一站式安装流程(以kde版本为例)
  15. 等比数列求和(递归)
  16. 华为AI Gallery社区《基于机器学习的欧洲杯赛事预测》技术分析系列——(一)基本原理
  17. 猫九先森教你如何优雅的玩
  18. php 星际争霸 面向对象,星际争霸之php面向对象(一)
  19. Python简单爬取起点中文网小说(仅学习)
  20. C#中窗体间传递数据的几种方法

热门文章

  1. 嵌入式linux内核开启键盘,- 基于嵌入式Linux内核的特殊矩阵键盘设计完整驱动控制模块方案...
  2. HTK下yes/no的识别
  3. Windows ESXI 5.5 升級到 VCSA 6.5
  4. Mysql学习总结(66)——设置MYSQL数据库编码为UTF-8
  5. Spring Boot学习总结(14)——Spring Boot常见面试题汇总
  6. Oracle学习总结(7)—— 常用的数据库索引优化语句总结
  7. 百一测评c语言两个数求和程序,2017计算机二级C语言考前测试题与答案
  8. linux维护rpm 数据库,Linux运维知识之linux rpm命令详细介绍
  9. java运行指定文件_java打开指定文件(运行指定程序exe)
  10. 无服务器TOP3大关键问题及解决方案