Application 金字塔程序操作

Application

代表 金字塔决策交易系统 应用程序。整个应用程序运行过程中，只有一个Application对象存在。

属性

属性	说明
AppName	返回当前应用程序名称，只读。注意：如果频繁调用该属性，请注意使用完毕后释放返回值。
AppPath	返回当前应用程序路径，只读。注意：如果频繁调用该属性，请注意使用完毕后释放返回值。
Visible	确定当前应用程序是否可视，如果为False，整个程序将被隐藏。读写。
Version	返回当前应用程序版本，只读。
NoShowTipDlg	是否在启动时显示“每日提示”窗口，允许显示为0 ，不允许为1。
UserName	返回当前注册用户名(对于非正式注册用户，返回空字符串)，只读。注意：如果频繁调用该属性，请注意使用完毕后释放返回值。
LastCycCalc	空余周期线数量是否参与公式计算,为1条件成立反之为0,读写
Left,Top	主程序左和高屏幕位置（只读）
Height,Width	窗体高度和宽度（只读）
EnginCode	返回当前用户计算机的机器识别码（只读）
ReceiveDataStatus	返回当前网络数据连接状态,启动连接1 未启动0
UserType	返回当前应用程序的版本类别 0普通版 1标准版 2专业版 3金钻版
ApplicationQuitMode	指示是否静默退出模式 1为静默退出模式(退出时不提示信息)
EndUseDate	返回当前正式版用户的截至有效服务期
TitleText	当前的主程序窗口标题（只读）。注意：如果频繁调用该属性，请注意使用完毕后释放返回值。
期权属性
RISKFREERATE	无风险利率（读写）。
OptionCalcDays	历史波动率计算天数（读写）。

方法

方法	说明
DoWaitCursor	打开或者关闭等待光标。
WinExec	执行一个外部应用程序。
system	执行一个DOS命令，例如 system("autoexec.bat")将执行一个批处理文件。
ShellExecute	打开、打印指定文件或者网址链接。
ActivateFrame	激活或者打开一个指定的框架。
IsActivateFrame	确定一个框架是否激活显示状态。例如：IsActivateFrame("Technic") 确认框架名称为Technic的技术分析主框架是否被打开，是返回1否则为0。
GetActiveGrid	得到当前处于活动状态的窗格对象。
GetActiveFrameName	得到当前激活的框架名称，若激活窗口不是框架，那么返回空串。注意：如果频繁调用该属性，请注意使用完毕后释放返回值。
GetCurrentStock	得到当前处于活动状态的品种代码和市场类型。
ActivateFrameWithCode	以指定代码和周期激活或者打开一个指定的框架。
SetTimer	设置一个系统定时器。
KillTimer	销毁以前调用SetTimer创建的用ID标识符标识的定时器事件。
SendMessage	发送系统消息，直到消息执行完毕后才返回。消息参数一般是系统的菜单命令或者一些系统命令。
PostMessage	发送系统消息，发送完毕后直接返回。消息参数一般是系统的菜单命令或者一些系统命令。
Register	自己提供注册名和注册码注册程序。
PlaySoundFile(path)	播放指定路径的音乐文件,文件类型可以是.mp3|.wav|.mdi等。
StopPlay()	停止播当前的音乐文件，仅对mp3文件有效。
EnableWindow	允许或者禁止主程序窗口,参数1允许操作窗口，参数0禁止窗口操作。
ShowWindow	显示或者隐藏主程序窗口。
ReceiveData	启动或者停止数据接收.例如 ReceiveData(1)表示启动接收,参数0表示关闭。
MsgOut	消息窗口显示消息，可以用该函数进行用户消息提示或者进行调试工作。例如 Application.MsgOut("你好")，将弹出消息窗口显示字符串
ClearMsg	清除消息窗口的所有显示文本。
PeekAndPump	处理应用程序未处理的消息，可以用在一个循环操作较长的代码里，防止因为占用CPU过长而导致程序停止响应。
QuitApplication	关闭并退出应用程序和计算机。

事件

事件	说明
Start	应用程序启动后发生。
Close	应用程序关闭时发生。
Timer	当达到SetTimer方法所设定的定时值后发生。其参数为定时器的标识符。
VBAStart	VBA宏启动运行后发生。
VBAEnd	VBA宏停止运行后发生
OnKeyDown	当主程序窗口按键时发生
OnKeyUp	当主程序窗口按键释放时发生

示例

'开打名为"Technic"的框架 

Application.ActivateFrame("Technic")