以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  请问单元格绘制小三角  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=187827)

--  作者:hbhb
--  发布时间:2023/8/15 10:28:00
--  请问单元格绘制小三角
大师:请问在单元格中绘制小红三角
DrawCell事件中的下列代码为何在表奇数行不能绘制?
 Dim Points(2) As Point
    Points(0) = New Point(e.X + e.Width - 6 , e.Y)
    Points(1) = New Point(e.X + e.Width , e.Y)
    Points(2) = New Point(e.X + e.Width , e.Y + 6)
    e.Graphics.FillPolygon(Brushes.Red, Points)

--  作者:有点蓝
--  发布时间:2023/8/15 10:37:00
--  
e.StartDraw
Dim Points(2) As Point
Points(0) = New Point(e.X + e.Width - 6 , e.Y)
Points(1) = New Point(e.X + e.Width , e.Y)
Points(2) = New Point(e.X + e.Width , e.Y + 6)
e.Graphics.FillPolygon(Brushes.Red, Points)
e.EndDraw

--  作者:hbhb
--  发布时间:2023/8/15 10:59:00
--  
谢谢!