Delphi+OPC 点击:983 | 回复:1



honest

    
  • 精华:0帖
  • 求助:0帖
  • 帖子:9帖 | 3回
  • 年度积分:0
  • 历史总积分:80
  • 注册:2003年8月28日
发表于:2004-04-06 22:52:00
楼主
请问高手:我现在正在做一个OPC的客户端, 下面 procedure AsyncRead(NumItems: Integer; var ServerHandles: PSafeArray; out Errors: PSafeArray;TransactionID: Integer; out CancelID: Integer);safecall; 编译通过,但过一会就会弹出"参数不正确",有谁能帮我一下,该如何定义?(看了VB的程序,我也不知道该如何改,因为两这定义相差有点远.Delphi在引用了OPCAutomation2.0后好象和VB不同,没有TItems和TItem,是不是?) 小弟实在感激不尽!大恩大德终生难忘! 如果能写详细点更好uhappyy@sina.com



gongkongedit

  • 精华:1099帖
  • 求助:0帖
  • 帖子:14392帖 | 54470回
  • 年度积分:0
  • 历史总积分:622
  • 注册:2008年9月08日
发表于:2004-04-07 10:46:00
1楼
以下是规范中的定义,希望对你有帮助。 HRESULT AsyncRead( [in] LONG NumItems, [in] SAFEARRAY(LONG) * ServerHandles, [out] SAFEARRAY(LONG) * Errors, [in] LONG TransactionID, [out] LONG * CancelID); OPCHANDLE = DWORD; POPCHANDLE = ^OPCHANDLE; OPCHANDLEARRAY = array[0..65535] of OPCHANDLE; POPCHANDLEARRAY = ^OPCHANDLEARRAY; ServerHandles: POPCHANDLEARRAY 你试试。

热门招聘
相关主题

官方公众号

智造工程师