vb画矢量图: 给你个大概的思路,定义一个结构: 比如: type point x as long y as long end type
type GRAPH drawtype as long‘假设线段的话为1,方块为2,圆为3 drawcolor as long ’颜色,不用说了吧 begindot as point ‘起点,如果是圆的画就是圆心 enddot as point ’终点,如果是圆的画就根据到圆心的距离计算半径 end type
这是个最简单的结构,可以用来记录你画的线段,方块,或圆等 然后定义: DIM MyDraw(1000) as GRAPH '假定你的文件最多可以有1001个矢量元素(从0到1000哦) ... ‘也可以使用动态数组,这样你的矢量元素就可以任意啦,更灵活 呵呵写文件不难,结构可以直接写到2进制文件,体积也不大的,读的时候更是一下自全部读入一个相同的结构里。 我想这些应该已经差不多了吧,如果你愿意的话还可以更进一步,比如在结构中定义线的样式和粗细,还有填充方式等等。 反正我的经验是只要你不需要线段拾取的话就根本不需要用到一个API。
http://www.ccw.com.cn/htm/app/aprog/01_2_27_3.asp
给你个大概的思路,定义一个结构:
比如:
type point
x as long
y as long
end type
type GRAPH
drawtype as long‘假设线段的话为1,方块为2,圆为3
drawcolor as long ’颜色,不用说了吧
begindot as point ‘起点,如果是圆的画就是圆心
enddot as point ’终点,如果是圆的画就根据到圆心的距离计算半径
end type
这是个最简单的结构,可以用来记录你画的线段,方块,或圆等
然后定义:
DIM MyDraw(1000) as GRAPH '假定你的文件最多可以有1001个矢量元素(从0到1000哦)
... ‘也可以使用动态数组,这样你的矢量元素就可以任意啦,更灵活
呵呵写文件不难,结构可以直接写到2进制文件,体积也不大的,读的时候更是一下自全部读入一个相同的结构里。
我想这些应该已经差不多了吧,如果你愿意的话还可以更进一步,比如在结构中定义线的样式和粗细,还有填充方式等等。
反正我的经验是只要你不需要线段拾取的话就根本不需要用到一个API。