使用Ifix的图表组（原创）

目的：使用ifix的图表组功能，在窗口打开时自动加载某一指定的图表组，在窗口关闭时，自动保存设定。实现方法：
一、窗口加载时自动加载图表组文件
在CFixPicture_Initialize()里加入代码
CGW_ApplyFileToChart 'ChartGroup1.csv', 'Chart1'
二、窗口关闭时，自动保存设定
由于ifix的图表组功能比较复杂，内部关联较多，使用内置的保存函数使问题变得复杂了。本例通过直接写图表组定义文件达到保存目的，代码如下：
在CFixPicture_Close()调用过程saveChartGroup
Sub saveChartGroup()
Dim strFileToSave As String, objStrMgr as Object
Set objStrMgr = CreateObject('iFix_CGW.ResMgr')
strFileToSave =System.FixPath(Htc_Path) & '\ChartGroup1.csv'
Dim intFileHandle As Long
intFileHandle = FreeFile
If strFileToSave = '' Then Exit Sub
Open strFileToSave For Output As #intFileHandle

Write #intFileHandle, objStrMgr.GetNLSStr(CLng(NLS_EXC)), objStrMgr.GetNLSStr(CLng(NLS_APPLYALL)