当前位置：工控论坛 > > 产品 > OPC

怎样用delphi写列出已经注册了的OPC服务器？？？ 点击：1148 | 回复：6



gongkongedit

    
  • 精华：1099帖
  • 求助：0帖
  • 帖子：14392帖 | 54470回
  • 年度积分：0
  • 历史总积分：622
  • 注册：2008年9月08日
发表于：2003-08-19 14:12:00
楼主
就是调用OPCServer的GetOPCServers方法 我看VB的源码是在Connect()之前调用的这个方法，但Delphi中用CreateComObject(ClassID)创建OPCServer后好象就已经连接到ClassID所指的那个OPC服务器上了吧，那怎样可以列出目标机器上所有的OPCServer，然后可以选择进入哪个服务器(也就是调用Connect()方法) 给段代码吧，高手们
分享到：
收藏 邀请回答 回复楼主 举报



jxlhh

  • 精华：0帖
  • 求助：0帖
  • 帖子：1帖 | 2回
  • 年度积分：0
  • 历史总积分：55
  • 注册：2003年8月21日
发表于：2003-07-21 08:41:00
1楼
这是我用delphi实现的，希望对你有帮助 var OpcServerNames: variant; i: integer; FServer: TOPCServer; begin FServer := TOPCServer.Create(nil); try // if (not (csDesigning in FServer.ComponentState)) then begin OpcServerNames := Fserver.GetOPCServers; Flst.Clear; //临时的Tstringlist for i := VarArrayLowBound(OpcServerNames, 1) to VarArrayHighBound(OpcServerNames, 1) do Flst.Add(OpcServerNames[i]); end; result := Flst; finally FServer.Free; end; end;
回复 引用 举报

deng_lp

  • 精华：5帖
  • 求助：0帖
  • 帖子：65帖 | 2669回
  • 年度积分：0
  • 历史总积分：2876
  • 注册：2001年6月19日
发表于：2003-07-21 11:43:00
2楼
多装几个opc server 用regedit 查找 opc server name, 你会找到你要的reg. 并区分例出.
回复 引用 举报

gongkongedit

  • 精华：1099帖
  • 求助：0帖
  • 帖子：14392帖 | 54470回
  • 年度积分：0
  • 历史总积分：622
  • 注册：2008年9月08日
发表于：2003-07-21 12:38:00
3楼
很有帮助，谢谢了
回复 引用 举报

福建菜鸟

  • 精华：0帖
  • 求助：0帖
  • 帖子：17帖 | 30回
  • 年度积分：0
  • 历史总积分：81
  • 注册：2002年3月13日
发表于：2003-08-01 22:04:00
4楼
有没有在C++ Builder中的代码呢
回复 引用 举报

rookie

  • 精华：0帖
  • 求助：0帖
  • 帖子：0帖 | 7回
  • 年度积分：0
  • 历史总积分：61
  • 注册：2003年2月11日
发表于：2003-08-19 14:12:00
5楼
请问有VC实例吗？
回复 引用 举报

rookie

  • 精华：0帖
  • 求助：0帖
  • 帖子：0帖 | 7回
  • 年度积分：0
  • 历史总积分：61
  • 注册：2003年2月11日
发表于：2003-08-19 14:12:00
6楼
请问有VC实例吗？
回复 引用 举报

热门招聘
相关主题

官方公众号
智造工程师