以前看过不少Window Form开发的流程图设计器，支持节点拖放，非常方便即可设计出很美观的流程图，作为一个程序员，对其内部实现原理一直很好奇，感叹有朝一日自己如果可以开发一款类似的软件那是多么让人兴奋的事情呀！自从有了这样的想法，一直都在积累和学习这方面的知识，最近一个偶然的机会竟然实现了一个简单的流程图设计器（虽然其功能还有很多不完善之处，但是心中还是非常高兴，满满的成就感）。
话不多说，先看一下实现的主界面效果：
[flash=500,400]http://s1.knowsky.com/20160211/e3hhgy1oukf05.png[/flash]
左边是一个ListView(listView1)，右边的画布是一个Panel(panel1)。下面将主要思路介绍如下：
1）允许拖放，listView1和panel1设置其AllowDrop=true;
2）非连接线类型的图形拖放处理：左边的listView1的项目被选中后，可以获取其图形类型（是路由器、是服务器还是云等），并在全局变量中记录下当前的操作对象类型，然后拖放到panel1后，panel1获得对应的图形类型，首先判断图的类型是否为非连接线，如果是则获取对应的图片，用g.DrawImage将其绘制到画布中，图片的坐标参考自当前鼠标（拖放到panel1最后松开鼠标左键时的坐标）的坐标。
3）连接线类型的图形处理：如果是连接线，应该要有两个点来确定一条直线。当选中listView1的连接线时，会在全局变量中记录下当前的操作对象类型是连接线，当在panel1上单击时，首选判断当前的操作对象类型的全局对象是否为连接线，如果是，则记录第一次单击的点，然后等待记录单击的第二个点，当第二次单击完成后，调用绘制直线的方法在画布中进行绘制直线。
4）当线和图形绑定后，拖放图形时，直线附属在图形的那个点会随着图形位置的变化而变化，当最后定位后，panel1会重绘网格和流程图。
5）编辑图形信息：在panel1上双击时，程序获取双击的坐标点离所有的图形区域中最近的图形，然后计算距离，看是否满足设置的阈值，如果小于阈值，则认为是在该图形上双击，是要进行编辑操作。
下面给出绘制网格的代码：
[flash=500,400]http://s1.knowsky.com/20160211/agiku4a532j05.gif[/flash][flash=500,400]http://s1.knowsky.com/20160211/zvanc3tewe205.gif[/flash]1///<summary>2///绘制网格3///</summary>4PRivatevoidrenderGrid()5{6//全局变量存储最大最小值，作为绘制区域7Graphics g =this.panel1.CreateGraphics();8Color color =Color.DarkGray;9Pen p =newPen(color,1);10p.DashStyle =DashStyle.Dash;11for(intx =0; x <=this.panel1.Width; x = x +20)12{13PointF p1 =newPointF(x,0);14PointF p2 =newPointF(x, Height);15g.DrawLine(p, p1, p2);16}1718for(inty =0; y <= panel1.Height; y = y +20)19{20PointF p1 =newPointF(0, y);21PointF p2 =newPointF(Width, y);22g.DrawLine(p, p1, p2);2324}2526}
View Code
下面给出在panel1上进行鼠标单击的处理程序：
[flash=500,400]http://s1.knowsky.com/20160211/agiku4a532j05.gif[/flash][flash=500,400]http://s1.knowsky.com/20160211/zvanc3tewe205.gif[/flash]1privatevoidpanel1_MouseClick(objectsender, MouseEventArgs e)2{3intX =e.X;4intY =e.Y;5if(this.__gObjType=="")6{7return;8}9if(this.__gObjType !="Line")10{11AddObjectFromMouseLocation(X, Y,0,0,this.__gObjType);12}13else14{15//line16if(__lineMouseClickedCount ==1)17{18__lineX2 =e.X;19__lineY2 =e.Y;20AddObjectFromMouseLocation(__lineX1, __lineY1, __lineX2, __lineY2,this.__gObjType);2122//连接线方向判断23__lineMouseClickedCount =0;24__lineX1 =0;25__lineY1 =0;26__lineX2 =0;27__lineY2 =0;28}29elseif(__lineMouseClickedCount ==0)30{31__lineX1 =e.X;32__lineY1 =e.Y;33__lineMouseClickedCount =1;34}35else36{37__lineMouseClickedCount =0;38__lineX1 =0;39__lineY1 =0;40__lineX2 =0;41__lineY2 =0;42}4344}45}
View Code
下面给出重绘的程序：
[flash=500,400]http://s1.knowsky.com/20160211/agiku4a532j05.gif[/flash][flash=500,400]http://s1.knowsky.com/20160211/zvanc3tewe205.gif[/flash]1privatevoidReDrawAll()2{3renderGrid();4Graphics g =this.panel1.CreateGraphics();5g.SmoothingMode =System.Drawing.Drawing2D.SmoothingMode.HighQuality;6GObject CurrObj =newGObject();7Rectangle Rct =newRectangle();8Pen p =newPen(Color.Black);9//p.Width = 2;10p.Width = __penWidth *__zoomTimes;1112Image ObjImg;13intxm =0;14intym =0;1516int_maxX =0;17int_maxY =0;18int_minX =0;19int_minY =0;20int_oldW =this.panel1.Width;21int_oldH =this.panel1.Height;2223stringIsLine ="";24//Nobj==50为当前画布最大的对象个数25for(inti =0; i < GNetworkFlow.Nobj; i++)26{27CurrObj =GNetworkFlow.GObjects[i];28//当前对象类型判断29if(CurrObj.Type =="") IsLine ="N/D";30if(CurrObj.Type =="Line") IsLine ="Y";31if((CurrObj.Type !="Line") && (CurrObj.Type !="")) IsLine ="N";32//33#regionold panel1作为画布，将其嵌套在panel2中实现超出边界出现滚动条3435if(_maxX <CurrObj.x2)36{37_maxX =CurrObj.x2;38}39if(_maxY <CurrObj.y2)40{41_maxY =CurrObj.y2;42}43if(_minX >CurrObj.x1)44{45_minX =CurrObj.x1;46}47if(_minY >CurrObj.y1)48{49_minY =CurrObj.y1;50}51525354if(_oldW < _maxX -_minX)55{56this.panel1.Width = _maxX -_minX;57}58if(_oldH < _maxY -_minY)59{60this.panel1.Height = _maxY -_minY;61}62if(this.panel1.Height <this.panel2.Height)63{64this.panel1.Height =this.panel2.Height;65}66if(this.panel1.Width <this.panel2.Width)67{68this.panel1.Width =this.panel2.Width;69}7071#endregion727374switch(IsLine)75{76case"Y":77arrow.DrawArrow(g, p, p.Brush, CurrObj.x1, CurrObj.y1, CurrObj.x2, CurrObj.y2);78xm = (CurrObj.x1 + CurrObj.x2) /2;79ym = (CurrObj.y1 + CurrObj.y2) /2;80AddText(xm, ym, CurrObj.Name,false);81
break;82case"N":83Rct.X =CurrObj.x1;84Rct.Y =CurrObj.y1;85Rct.Width = CurrObj.x2 -CurrObj.x1;86Rct.Height = CurrObj.y2 -CurrObj.y1;87if(CurrObj.Type !=String.Empty)88{89ObjImg =FindGObjectTypeImage(CurrObj.Type);90g.DrawImage(ObjImg, Rct);91AddText(CurrObj.x1, CurrObj.y1, CurrObj.Name,true);92GNetworkFlow.AdjustLinkedTo(CurrObj.Name);93}94
break;95}96}9798}
View Code
下面将继续完善以下几个功能：
1）序列化：可以将图形序列化和反序列化，将序列化的信息保存到数据库，也可以从数据库加载图形；
2）图形节点必须要附加其他属性和方法，为流程记录更多的信息、例如权限配置、当前处理的人、下一步是什么节点等；
3）绘图功能的加强，绘图可以动态修改颜色，这样可以区分流程在不同节点的颜色显示；
4）布局优化算法，能否根据画布大小，自动排列图形...
今天又将界面做了美化，界面如下：
[flash=500,400]http://s1.knowsky.com/20160211/kh2ba2h0xf505.jpg[/flash]