使用 FixDataSystem 对象

FixDataSystem对象配置时会有些困难，但这是最有效访问数据库的方法。这个方法将保留数据项对象组。该方法要比使用FindObject方法速度快，因为数据项都以组的形式读取和写入。换言之，当执行FixDataSystem对象组的读取方法时，它将在一次调用中读取所有添加的标签。当从数据项集内提取数据项值时，它实际上是从缓存区中读取的，而不是从数据库中请求数据。如果连续读取或写入大量标签，应该考虑使用FixDataSystem对象。

示例

下面的代码例子说明如何使用FixDataSystem对象来访问thisnode:tag.f_cv:

'创建数据系统OCX

Dim FDS As Object

Dim Y as single

 

Set FDS = CreateObject("FixDataSystems.Intellution FD Data _

     System Control")

 

FDS.Groups.Add ("DataGroup1")

'在组集中添加一个组

 

FDS.Groups.Item("DataGroup1").DataItems.Add("Fix32.thisnode._

     tag.f_cv") 'Add the item to the group

 

FDS.Groups.Item("DataGroup1").Read

'Read all the items in the group

 

Y = FDS.Groups.Item("DataGroup1").DataItems.Item(1).Value

'Get the value which was cached in the read

 

FDS.Groups.Item("DataGroup1").DataItems.Item(1).Value = 3.0 'Change the cache

 

FDS.Groups.Item("DataGroup1").Write

'Write out all the caches in the group (only write those

'items which have changed)