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


金字塔客服中心 - 专业程序化交易软件提供商 → 金字塔软件 → 高级功能研发区 → 自定义一个取光标数值的函数 但是通不过

   

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

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

主题：自定义一个取光标数值的函数 但是通不过
帅哥哟，离线，有人找我吗？
小心翼翼
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：新手上路 帖子：3 积分：0 威望：0 精华：0 注册：2020/3/2 11:46:45 		  发帖心情 Post By：2020/3/3 0:27:38 [显示全部帖子]

Function SYSPARAM(6)(Grid, Index, x, y)
SYSPARAM(6)=0
    dim Date
    dim Values
    call Grid.ValueByPoint(x,y,Date,Values,true)
    SYSPARAM(6)=Values
End Function

这样行不行？
 回到顶部
帅哥哟，离线，有人找我吗？
小心翼翼
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：新手上路 帖子：3 积分：0 威望：0 精华：0 注册：2020/3/2 11:46:45 		  发帖心情 Post By：2020/3/3 0:33:55 [显示全部帖子]

取光标的数值用 sub可以做到  为啥用function个就不行呢？

 回到顶部
帅哥哟，离线，有人找我吗？
小心翼翼
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：新手上路 帖子：3 积分：0 威望：0 精华：0 注册：2020/3/2 11:46:45 		  发帖心情 Post By：2020/3/12 19:34:32 [显示全部帖子]

那怎么用在指标公式里面呢？

Private Declare Function GetCursorPos Lib "user32" (lpPoint As POINTAPI) As Long
    Private Type POINTAPI             '定义点(Point)结构
        X As Long        '点在X坐标(横坐标)上的坐标值
        Y As Long        '点在Y坐标(纵坐标)上的坐标值
    End Type


 Dim MyPoint As POINTAPI
'    dl&= GetCursorPos(MyPoint)        '调用函数，获取屏幕鼠标坐标
 Dim Ypos As Long
'    Ypos=MyPoint.Y
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版    Powered By weistock 2012
页面执行时间 01.25000 秒, 6 次数据查询