⑴ 哪位朋友用過西門子的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用什麼來做這事?????