delphi 图形处理 源码
加入新图形的步骤 1、在GraphRecord单元 定义结构体 2、在MyGraph单元的集合体(TClassGraph)中 加入该图形 3、MyGraph单元的private声明该图形的链表,Create中创建，Destory中释放 4、MouseUp事件中加入链表 5、MouseMove事件中移动图形 6、DrawGraph过程中加入画图 7、Clear 加入清空 8、preDel过程 9、preFill过程 10、preMove过程 11、SaveToFile过程 12、LoadFromFile过程
下载地址
用户评论
自己写的一个控件，可以绘制简单图形，可以移动，删除，填充颜色，文件可以保存。