[浏览完整版]
标题：1月14日更新，增加单元格直接绘图功能
1楼
狐狸爸爸 发表于：2009/1/14 19:01:001、修正了一些Bug，例如在没有启动打印服务的操作系统能够下，也能运行foxtable了。
2、开放了直接在单元格绘图的功能，使用方法请参考帮助文件“开发篇 - 专题 - 直接在单元格绘图”
e.StartDraw()
Dim Width As Integer = (e.Width - 2 )* e.Row("进度") \ 100
If e.Row("进度") = 100 Then
e.Graphics.FillRectangle(Brushes.Green,e.x + 1,e.y + 1, Width, e.Height - 2)
Else
e.Graphics.FillRectangle(Brushes.Red,e.x + 1,e.y + 1, Width, e.Height - 2)
End If
e.EndDraw()
End If
2、开放了直接在单元格绘图的功能，使用方法请参考帮助文件“开发篇 - 专题 - 直接在单元格绘图”
在单元格中直接绘图
在介绍表事件DrawCell的时候，我们了解了通过更改文本和样式，让单元格的显示变得丰富多彩。
其实这只是DrawCell事件的最基础用法，在此之外，该事件还提供了通过GDI+绘图的功能。
DrawCell事件的完整e参数属性：
Table: 准备绘制的表
Row: 准备绘制的行
Col: 准备绘制的列
Style： 指定自定义样式的名称，如果用默认的样式绘制单元格，无须设置Style属性。
Text： 字符型，获得或者设置要绘制的文本内容
X: 要绘制单元格的水平坐标位置，单位为像素
Y: 要绘制单元格的垂直坐标位置，单位为像素
Width： 要绘制单元格的宽度，单位为像素
Height： 要绘制单元格的高度，单位为像素
Graphics：返回一个Graphics对象，通过这个对象可以在单元格中绘制图形。
此外该事件的e参数还提供了两个方法：
StartDraw：开始绘图
EndDraw： 结束绘图
所有的绘图代码，必须在这两个方法之间。
示例
此示例可以参考CaseStudy目录下的文件“单元格绘图.Table”。
假定表中有两列，分别是项目和进度，希望能够直接在项目列的单元格中用条形图表示进度，DrawCell事件的代码为：
If
e.StartDraw()
Dim Width As Integer = (e.Width - 2 )* e.Row("进度") \ 100
If e.Row("进度") = 100 Then
e.Graphics.FillRectangle(Brushes.Green,e.x + 1,e.y + 1, Width, e.Height - 2)
Else
e.Graphics.FillRectangle(Brushes.Red,e.x + 1,e.y + 1, Width, e.Height - 2)
End If
e.EndDraw()
End If
绘制出的效果为：
此主题相关图片如下：0987.gif
需要注意的是，在单元格绘制出的图形，只有直接打印才能打印出来，普通的打印无能为力。
[此贴子已经被作者于2009-1-14 19:03:21编辑过]
2楼
狐狸爸爸 发表于：2009/1/14 19:06:00以下是引用hnaysx在2009-1-14 19:04:00的发言：
打印这个问题 总于解决了 有一年了吧？老六 发现有些完全能解决 就看老六去不去解决
嘿嘿，曾经有一长辈说我是一粒算盘子，不拨就不动。
3楼
smileboy 发表于：2009/1/14 19:06:00顶！
4楼
czy 发表于：2009/1/14 19:08:00顶起，以后大家都多拨几下。
5楼
程兴刚 发表于：2009/1/14 19:18:00好啊,这么快又更新了,顶!
先收藏,慢慢啃!
[此贴子已经被作者于2009-1-14 19:21:38编辑过]
6楼
菜鸟foxtable 发表于：2009/1/14 20:14:00顶起.赶快下载看看我的电脑支持不支持.
7楼
lkqing 发表于：2009/1/14 20:32:00日新日异
8楼
烟酒 发表于：2009/1/14 20:43:00单元格绘图终于好了 等来了
谢谢
9楼
擎天柱 发表于：2009/1/14 20:59:00真的越来越强悍、越来越丰满了。
10楼
czy 发表于：2009/1/14 22:31:00nnd，我的电脑读不出主板序列号。
[此贴子已经被作者于2009-1-14 22:31:02编辑过]