就是根据连续合约的图来出信号,但实盘上是下单到所对应的主力合约上是吗
多周期框架如何把周图,月图自动设置为对应的连续品种?
在周图,月图上加载连续合约,键盘输入品种代码 回车键。
想在窗口WinWeek里显示JMLX, 在三个事件里都写了代码,但都没切换成功
以下内容为程序代码:
1 Sub MyChart_TableChangeStock(Grid, Code, Market, Result)
2 Application.MsgOut "TableChangeStock: Grid.Name=" & Grid.Name &", Code=" & Code & ", Market=" & Market
3 if Code="JM09" THEN
4 Application.MsgOut "TableChangeStock JM09"
5 call MyChart.GetGridByName("WinWeek").ChangeStock("JMLX","DQ")
6 MyChart.GetGridByName("WinWeek").reInitData
7 MyChart.Refresh
8 'MyChart.InitAllGrid
9 END IF
10
11 End Sub
12
13
14 Sub MyChart_TableClickStock(Grid, Code, Market, Result)
15 Application.MsgOut "TableClickStock: Grid.Name=" & Grid.Name &", Code=" & Code & ", Market=" & Market
16 if Code="JM09" THEN
17 Application.MsgOut "TableClickStock JM09"
18 call MyChart.GetGridByName("WinWeek").ChangeStock("JMLX","DQ")
19 MyChart.GetGridByName("WinWeek").reInitData
20 MyChart.Refresh
21 'MyChart.InitAllGrid
22 END IF
23 End Sub
24
25
26 Sub MyChart_ChangeStock(Grid, Code, Market, Result)
27 Application.MsgOut "ChangeStock: Grid.Name=" & Grid.Name &", Code=" & Code & ", Market=" & Market
28 if Code="JM09" THEN
29 Application.MsgOut "ChangeStock JM09"
30 call MyChart.GetGridByName("WinWeek").ChangeStock("JMLX","DQ")
31 MyChart.GetGridByName("WinWeek").reInitData
32 MyChart.Refresh
33 'MyChart.InitAllGrid
34 END IF
35 End Sub
36
这个您要去高级功能区发帖咨询,请用户注意问题咨询版块