Модераторы: MetalFan
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Проблема с PSafeArray, c VB5 на Delphi7 
:(
    Опции темы
AlexDon
Дата 23.8.2006, 16:43 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 22
Регистрация: 27.6.2006

Репутация: нет
Всего: нет
У меня следующая проблема:

Есть OPC сервер NAPOPC. К нему есть пример на VB5. Мне нужно сделать этот пример на DELPHI7.
Все вроде получилось, кроме одной функции.

1) фрагмент на VB5:

Код

Private Sub btnRead_Click()
  ....
  Dim serverHandles(1) As Long
  Dim Errors() As Long
  ...
  serverHandles(1) = anItem.ServerHandle
  Group.OPCItems.Remove 1, serverHandles, Errors



2) После импорта библиотеки получил следующий прототип функции:

Код

    procedure Remove(NumItems: Integer; var ServerHandles: PSafeArray; out Errors: PSafeArray); safecall;


  Если передавать парамеиры типа PSafeArray, то транслятор выдает ошибку:

[Error] Unit1.pas(256): Type not allowed in Variant Dispatch call

  Если передавать то, что "нравится транслятору", то при выполнении команды выдается ошибка:

 EOleSysError with message 'Несовпадение типов'

 Подскажите, что же все таки нужно передавать в качестве параметров?
PM MAIL   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: ActiveX/СОМ/CORBA"

Rrader
Girder

Запрещено:

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами


  • Литературу по Delphi обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Delphi
  • Вопросы по SQL и вопросы по базам данных, не связанные с Delphi, задавать здесь

Если Вам помогли, и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Rrader, Girder.
 
1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: ActiveX/СОМ/CORBA | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0624 ]   [ Использовано запросов: 21 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.