主题：在行号的位置,绘制一个回型针表示有附件?

If e.Col.name= "邮件标签" Then
    e.StartDraw()
    e.Graphics.DrawImage(GetImage(ProjectPath & "邮件.ico"), e.x + 3, e.y + 3,16,16)
    e.EndDraw()
End If

If e.Col.name= "附件" Then
    e.StartDraw()
    e.Graphics.DrawImage(GetImage(ProjectPath & "回形针.ico"), e.x + 3, e.y + 3,16,16)
    e.EndDraw()
End If

 

 

 数据行的添加图标的代码。在 DrawCell  中。

 给单元格设置图标的方法。

CurrentTable.grid.SetCellImage(2, 1, getimage("d:\test.jpg"))

这个是单元格 我已经做好了，我需要列标题的，是怎么做的？

列标题不能够哦，看有没有高手知道。

唉  我怎么没有想到   OK了呀!

don老大,   能不能不显示列名 直接显示图标?

可以,但图片如何居中就不知了

With Tables("表A")
    .grid.SetCellImage(0, 3, getimage("d:\Met\Images\01.png"))
    .DataTable.DataCols("第三列").Caption = " "
    .DataTable.BuildHeader()
End With

老大 这个我测试过了 不行   还是会显示列名的.  我问之前就是这样测试的

奇怪 你的怎么行的呢?