以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  高级功能研发区  (http://weistock.com/bbs/list.asp?boardid=5)
----  curValue  (http://weistock.com/bbs/dispbbs.asp?boardid=5&id=96653)

--  作者:orca8
--  发布时间:2016/4/24 13:23:08
--  curValue

CursorMove(Grid,Index,X,Y)

Grid                关系到的主窗格对象,窗格分主和副两种,请注意区分

Index               数据索引(基于0开始),注意要区分当前是属于K线技术分析还是分时线

X                   鼠标的X坐标位置,如果十字关标是用户键盘按下操作的,那么此值是-1

Y                   鼠标的Y坐标位置,如果十字关标是用户键盘按下操作的,那么此值是-1


我现在要知道 键盘的左右键 移动的时候 十字光标对应的 日期。或者坐标,有什么可以 办法可以实现???


--  作者:yukizzc
--  发布时间:2016/4/24 21:15:38
--  

dim xx
dim yy
dim vv

sub Dynamic_CursorMove(Grid,Index,X,Y)
  dim Date
    dim Values
    call Grid.ValueByPoint(x,y,Date,Values,true)
    \'call Grid.DRAWTEXT(x, y-100, Values, RGB(240, 240, 240))
    xx=x
    yy=y-100
    vv=Values
end sub

set Grid = Dynamic.GetGridByName("main")

sub Dynamic_Paint()
call Grid.DRAWTEXT(xx, yy, vv, RGB(240, 240, 240))
end sub


--  作者:orca8
--  发布时间:2016/4/24 21:30:52
--  
这个能实现了, 主要是能 支持键盘移动十字光标,获取十字光标的日期

--  作者:yukizzc
--  发布时间:2016/4/25 8:48:01
--  

call Grid.ValueByPoint(x,y,Date,Values,true)
    \'call Grid.DRAWTEXT(x, y-100, Values, RGB(240, 240, 240))
    xx=x
    yy=y-100
    vv=Date

 

看下valuebypoint,了解下他后面两个输出函数即可


--  作者:orca8
--  发布时间:2016/4/25 9:50:21
--  
关键是这个函数如果是键盘移动 xy的值是付一
--  作者:yukizzc
--  发布时间:2016/4/25 10:30:01
--  

这个键盘移动时候不行,需要鼠标移动时候才能用

您这边一定要键盘的操作????我们想下吧


--  作者:王锋
--  发布时间:2016/4/25 10:30:41
--  

Grid对象

CrossIndex 属性


--  作者:orca8
--  发布时间:2016/4/25 16:31:20
--  
通过索引没办法得到准确的日期,因为有节假日 周末,我要得到当前十字光标上k线的日期。
--  作者:王锋
--  发布时间:2016/4/25 16:41:33
--  
CrossIndex 就是K线的索引
--  作者:orca8
--  发布时间:2016/4/25 19:47:58
--  
怎么换成日期罗