以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  高级功能研发区  (http://weistock.com/bbs/list.asp?boardid=5)
----  Grid对象DrawEclipse没有效果  (http://weistock.com/bbs/dispbbs.asp?boardid=5&id=137652)
--  作者：aris37
--  发布时间：2016/8/8 10:01:55
--  Grid对象DrawEclipse没有效果
大咖好：
    我按照文档的样例，画了一个椭圆，但是后面的MsgBox可以正确弹出数据，但是执行目标VBA看不到
画的椭圆，帮忙分析下原因：

Set Grid = Technic.GetGridByName("Main")  

Grid.DrawEllipse 10,10,200,200,255  // 看不到画的椭圆

Count = Grid.FormulaCount 
MsgBox Count   // 这一步正确
--  作者：王锋
--  发布时间：2016/8/8 14:03:10
--  

注意:你应该在 框架 的 Paint 事件里编写绘图代码, 否则当窗口重绘后你的绘图会被覆盖掉.