IFIX VBA的几个小窍门 收藏.docx

IFIX VBA的几个小窍门 收藏 1、从后台调度中访问或修改全局变量的代码 描述:在iFIX中使用调度要后台运行的时候需要启动FixBackgroundServer程序，而该程序实际上是启动了独立于Workspace的进程,所以在后台调度中不能直接访问全局变量。下面的例子代码描述了怎样访问的方法： First get a pointer to the Application object in the WorkspaceDim WrkSpcApp As ObjectSet WrkSpcApp = GetObject(, Workspace.Application) Get a pointer to the Variable object called Variable1 in the User globalsDim TargetVar As ObjectSet TargetVar = WrkSpcApp.Documents(User).Page.FindObject(Variable1) Set the current value in the variable object to a 1TargetVar.CurrentValue = 1 2、脉冲输出示例Dim PauseTime, StartCloseDigitalPoint Fix32.FIX.DDD.F_CVPauseTime = 0.8　 设置暂停时间。　Start = Timer　 设置开始暂停的时刻。　Do While Timer Start + PauseTime　DoEvents　 将控制让给其他程序。　LoopOpenDigitalPoint Fix32.FIX.DDD.F_CV 3、显示通讯状态Is there a way to view communication status of the driver without using Mission Control? ResolutionUsing a digital input block reading a hardware register, the A_cualm field will be utilized. Chain the DI block to an event action block to a digital output tag using the SIM driver. In the event action block use the following script:IF the A_cualm =com Then set DO =1Else set the DO=0A data link can be made to the Sim block. The value of this block will determine the status of the communcation. 4、用VBA脚本打开和关闭调度为了打开和关闭调度，必须用下列方法： 打开一个名字为“ddd”的调度： Application.Documents.Open C:\Dynamics\pdb\ddd.evs 关闭一个名字为“ddd”的调度： Application.Documents(ddd).Close 注意：关闭调度时不用扩展名 .evs 。 5、在后台调度中访问画面中的对象在调度中中的脚本不能直接访问画面中的对象。办法：使用FindObject方法：Dim AppObj as ObjectDim PicObj as Objectset AppObj = GetObject (,Workspace.Application)set PicObj = AppObj.System.FindObject (Pic.Obj)PicObj.Value = 5Pic为画面的名字，picObj 为所用的对象的属性或方法。6、怎样用程序控制7.X版本的驱动程序的datablocks, devices, or channels扫描的启停在应用过程中可能希望灵活的控制驱动程序中的某一个Channel或Device或Datablock,以下介绍两种方法:6.1.通过编写脚本:本例子是用脚本来控制第一个Channel的第一个Device的第一个Datablock的,如果你想控制Channel或Device,只需将channel handle或device handle象本例中的Datablock赋给SetPropertyData function即可:Dim objDriver As ObjectDim strDRVAcronym As StringDim strProgId As StringVar