⑴ 哪位朋友用过西门子的OPC SERVER
引用电烙铁 的回复内容:我睁滑举一直就想用自己写的上位机程序通过PPI电缆来监视和修改西门子的PLC的内存,于是就买了个西门子的PCAccessV1.0.2.26OPC软件，回家一看，好家伙，没加密的。可以随便装。安装好后我的电脑就有OPC服务器了，还有个用VB写的客户程序例子。我打让运开VB6编译运行，果然可以监视和修改西门子的PLC的内存。细看这个VB例子，'建立与OPC服务器的连接SetQOpcServer=NewOPCServerCallQOpcServer.Connect("S7200.OPCServer")'S7200.OPCServer是西门子OPC服务器的名称SetQGroups=QOpcServer.OPCGroups'''.DefaultGroupIsActive=False'=QGroups.Add("QGroup1")''SetGroupPropertiesQGroup.IsSubscribed=True'EnableCallbacksQGroup.UpdateRate=100'这个群组的刷新悉碧速度是100ms'下面再往群组里添加要传送的地址单元请教Vb里用New来创建类的实例，但我搞不清Delphi用什么来做这事？？？？？
⑵ 哪位朋友用过西门子的OPC SERVER
我一直就想用自己写的上位机程序通过PPI电缆来监视和修改西门子的PLC的内存,于是就买了个西门子的PCAccessV1.0.2.26OPC软件，回家一看，好家伙，没加密的。可以随便装。安装好后我的电脑就有OPC服务器了，还有个用VB写的客户程序例子。我打开VB6编译运行，果然可以监视和修改西门子的PLC的内存。细看这个VB例子，'建立与OPC服务器的连接SetQOpcServer=NewOPCServerCallQOpcServer.Connect("S7200.OPCServer")'S7200.OPCServer是西门子OPC服务器的名称SetQGroups=QOpcServer.OPCGroups'''.DefaultGroupIsActive=False'=QGroups.Add("QGroup1")''SetGroupPropertiesQGroup.IsSubscribed=True'EnableCallbacksQGroup.UpdateRate=100'这个群组的刷新速度是100ms'下面再往群组里添加要传送的地址单元请教Vb里用New来创建类的实例，但我搞不清Delphi用什么来做这事？？？？？