以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://222.73.7.161/bbs/index.asp)
--  高级功能研发区  (http://222.73.7.161/bbs/list.asp?boardid=5)
----  [求助]请教APPLICATION_KeyDown的用法范例  (http://222.73.7.161/bbs/dispbbs.asp?boardid=5&id=48850)
--  作者：sw3661354
--  发布时间：2013/2/25 9:48:19
--  [求助]请教APPLICATION_KeyDown的用法范例

请问APPLICATION_KeyDown怎么用？

Sub APPLICATION_KeyDown(KeyCode, Shift)

End Sub

 

KeyCode, Shift 两个参数怎么设置

还有说明里说OnKeyDown       当主程序窗口按键时发生

 

此处的“主程序窗口按键”具体指的是什么啊？
--  作者：admin
--  发布时间：2013/2/25 10:01:40
--  

参考 http://www.weistock.com/bbs/dispbbs.asp?BoardID=5&ID=2671&skin=0

这个帖子的范例。

 

代码范例用的是Technic_KeyDown也就是技术分析K线图中的事件。

APPLICATION_KeyDown 则是金字塔整个主程序的事件
--  作者：sw3661354
--  发布时间：2013/2/25 12:06:32
--  
问题解决 谢谢老师啊
--  作者：guotx2010
--  发布时间：2013/2/25 12:38:53
--  

Sub APPLICATION_KeyDown(KeyCode, Shift)
    \'application.MsgOut KeyCode & "," & Shift
    if KeyCode=119 then              \'按F8打开窗体
        frmTest.Show
    end if 
End Sub

 
--  作者：sw3661354
--  发布时间：2013/2/26 13:54:52
--  

恩  谢谢你 guotx2010  老师