救命!!!!

hhccl 2002-07-15 05:38:32
我现在急须这样的控件
就是可以在一个视图中任意拖拽,并且相互之间可以画线连接,拖拽控件的同时连线跟着移动
同时该接点可以更换不同的图标!
谢谢

...全文
56 19 打赏 收藏 转发到动态 举报
写回复
用AI写文章
19 条回复
切换为时间正序
请发表友善的回复…
发表回复
daehappy 2002-07-21
  • 打赏
  • 举报
回复
up!gz!
golden24kcn 2002-07-19
  • 打赏
  • 举报
回复
是不是类似一起EDA的东西?
golden24kcn 2002-07-19
  • 打赏
  • 举报
回复
是不是类似一起EDA的东西?
pctommy 2002-07-18
  • 打赏
  • 举报
回复
见过,没编过。
看看这个:
http://www.anvilstudio.com
是一个做MIDI的软件,里面有一个这样的东西(View/Performer)
如果能用SoftIce跟踪一下,或许会有些启发
hhccl 2002-07-18
  • 打赏
  • 举报
回复
呵呵,我是做工作流管理
你有没有具体点的程序呢?
哈士奇打嘴仗 2002-07-18
  • 打赏
  • 举报
回复

你在做监控系统??,表示地图上的监控点\对象!
这个没有必要用控件来实现,用image和imagelist控件完全可以解决问题,非常简单灵活.
我告诉你我是如何做的。
首先,在设计阶段在界面上放image控件一个,Index设置为0,作为程序运行阶段动态生成的母本。
在界面上放置一个imagelist控件,里面存放你需要变换的图标(当然可以直接用文件,这样不需要imagelist控件)
在界面上放一个Line控件
你需要的功能的实现办法:
拖曳:
image控件(假设为imgX)的MouseDown事件里面写加
If Button = 1 then
theDrag=Index'此处保存拖曳的图标索引,后面有用
imgX(index).Drag 1
end if
Button=2即鼠标右键一般用来弹出菜单,不拖曳!
在image控件的容器控件的DragDrop事件里面添加代码(拖曳结束时改变image控件的坐标到新地址)
imgX(theDrag).Left = X
imgX(theDrag).Top = Y

为了使拖曳过程生动,我们在容器控件的DragOver事件里面加入如下代码(显示从原地到现在拖曳到的位置的直线(改变Line控件的坐标实现))
lineShow.X2 = X
lineShow.Y2 = Y

至于节点换图标,可以直接改变,下面是从我的系统里面抓取的:
frmMain.imgComm(iCom).Picture = frmMain.ilstMain.ListImages(LINK_ERROR + 1).Picture

节点之间的连接当然也可以用Line数组来解决,界面上放母本,动态加栽!

你可以试一试我的方法,其实很简单的,而且非常灵活,我觉得用控件比较难以解决。可以是可以,代价太高!还是 自己做把


网络咖啡 2002-07-17
  • 打赏
  • 举报
回复
自己做一个算了。
hhccl 2002-07-15
  • 打赏
  • 举报
回复
不仅仅是画线呀
zyl910 2002-07-15
  • 打赏
  • 举报
回复
计算好坐标就行了

我以前编了一个画线工具:
http://zyl910vb.51.net/vb/wdzp/LineTool.htm

注意把下载后的*.zip.jpg改名成*.zip
thinkeasy 2002-07-15
  • 打赏
  • 举报
回复
DirectX 8.0SDK,中就有这样的例子
hhccl 2002-07-15
  • 打赏
  • 举报
回复
haohc@tsinghuatec.com
hhccl 2002-07-15
  • 打赏
  • 举报
回复
呵呵,我是做工作流管理
你有没有具体点的程序呢?

chi_ke 2002-07-15
  • 打赏
  • 举报
回复
将你的e-mail贴出来
发给你
(.)(.)
|
~~~
^^^^^
dreameasy 2002-07-15
  • 打赏
  • 举报
回复
我估计你在做监控系统,表示地图上的监控点\对象!如果是这样的话,我们是同行了。
这个没有必要用控件来实现,用image和imagelist控件完全可以解决问题,非常简单灵活.
我告诉你我是如何做的。
首先,在设计阶段在界面上放image控件一个,Index设置为0,作为程序运行阶段动态生成的母本。
在界面上放置一个imagelist控件,里面存放你需要变换的图标(当然可以直接用文件,这样不需要imagelist控件)
在界面上放一个Line控件
你需要的功能的实现办法:
拖曳:
image控件(假设为imgX)的MouseDown事件里面写加
If Button = 1 then
theDrag=Index'此处保存拖曳的图标索引,后面有用
imgX(index).Drag 1
end if
Button=2即鼠标右键一般用来弹出菜单,不拖曳!
在image控件的容器控件的DragDrop事件里面添加代码(拖曳结束时改变image控件的坐标到新地址)
imgX(theDrag).Left = X
imgX(theDrag).Top = Y

为了使拖曳过程生动,我们在容器控件的DragOver事件里面加入如下代码(显示从原地到现在拖曳到的位置的直线(改变Line控件的坐标实现))
lineShow.X2 = X
lineShow.Y2 = Y

至于节点换图标,可以直接改变,下面是从我的系统里面抓取的:
frmMain.imgComm(iCom).Picture = frmMain.ilstMain.ListImages(LINK_ERROR + 1).Picture

节点之间的连接当然也可以用Line数组来解决,界面上放母本,动态加栽!

你可以试一试我的方法,其实很简单的,而且非常灵活,我觉得用控件比较难以解决。可以是可以,代价太高!

zhujiechang 2002-07-15
  • 打赏
  • 举报
回复
你说的这种控件,现在我还没有发现,也许没有人会去特意的去做。
你可以编写类来实现。
象microsoft visio
zhujiechang 2002-07-15
  • 打赏
  • 举报
回复
你说的这种控件,现在我还没有发现,也许没有人会去特意的去做。
你可以编写类来实现。
hhccl 2002-07-15
  • 打赏
  • 举报
回复
比如一组工具
有按扭,带箭头的线段等
我拖拽两个到一个窗体中
然后可以用线段将他们连到一起
任意排列,拖拽

ll_angel 2002-07-15
  • 打赏
  • 举报
回复
不清楚,写明白
longhairgw 2002-07-15
  • 打赏
  • 举报
回复
不明白

7,789

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

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