这是我在2002年时完成的一个图纸生成器代码中的核心部分,上面实现了机械图纸的生成功能,生成出来的结果和用AutoCAD绘制出来的完全一样(如果大家只看生成出来的效果文件[在PDF文件中有],估计没人会相信这是用Delphi的Canvas上直接绘制的),程序已能生成"任意方向的线段",任意大小的圆弧,角度,上下标,公差,标注,表框(用线段组合),公司Logo(封闭图形填充等,在此程序中,给出的是光学图纸的例子,里面包含有大量的光学计算公式,只需简单几个参数就能生成出最终的加工图,工作效率大大提高(最开始用CAD绘图,约10分钟/张,用此程序后可达到10秒/张或更快[视参数的录入速度而定].
由于大部份用得最多的不是在Canvas上绘图,而是我们日常办公中最多的报表输出,为此我在此程序中同时还添加了一个表格在直接在画布上生成的例子,主要供大家在套打方面进行参考,此部分例子比较简单,不过已经实现了基本上常用的功能.
本程序只是一个例子程序,界面上我没做处理,比较粗糙,大家在使用时,把精力主要重点放在代码方面.
*注:绘图那块我用到DLL文件,此DLL文件的源码放在DLL目录中,该文件也是本人原创,如果大家要学习DLL文件的编写和调用,也可以用此程序作参考用. |
