欢迎使用金字塔普通技术服务论坛，您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴，普通区问题处理速度慢，请耐心等待。谢谢您对我们的支持与理解。


金字塔客服中心 - 专业程序化交易软件提供商 → 金字塔软件 → 高级功能研发区 → 请教版主类的私有成员的问题

   

欢迎使用金字塔普通技术服务论坛，您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴，普通区问题处理速度慢，请耐心等待。谢谢您对我们的支持与理解。    

  共有6721人关注过本帖树形打印复制链接

主题：请教版主类的私有成员的问题
帅哥哟，离线，有人找我吗？
volersky
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：论坛游侠 帖子：109 积分：764 威望：0 精华：0 注册：2010/6/27 14:04:16 		请教版主类的私有成员的问题  发帖心情 Post By：2010/9/9 22:17:30 [显示全部帖子]

新建框架QS,在其paint事件中加入

 

 
    dim bbcca,mGrid
    Set mGrid=QS.ActiveGrid()
    Set bbcca=New testClass
     bbcca.Create(mGrid)

 

自定义类testClass:
Private myGrid

Sub Create(Grid)
   myGrid=Grid
   myGrid.DrawText 100,100,Cstr(222222222),rgb(255,255,0)
End Sub

当我把框架里的Grid对象传过来时，为什么这里的编译通不过，谢谢
 
myGrid.DrawText 100,100,Cstr(222222222),rgb(255,255,0)
 说是不支持这个方法

 

当改为以下时:

Private myGrid

Sub Create(Grid)
   Grid.DrawText 100,100,Cstr(222222222),rgb(255,255,0)
End Sub

 

可以通过!

 

请版主大大指教

 
[此贴子已经被作者于2010-9-9 22:31:38编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
volersky
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：论坛游侠 帖子：109 积分：764 威望：0 精华：0 注册：2010/6/27 14:04:16 		自行解决了  发帖心情 Post By：2010/9/9 22:38:31 [显示全部帖子]

原来对象的赋值要采用Set 来赋值

上面的myGrid=Grid，用Set myGrid=Grid就全部ok了!

 

谢谢两位管理员
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版    Powered By weistock 2012
页面执行时间 0.14844 秒, 6 次数据查询