ActiveX DLL и Delphi

← →
Ilya53 (2004-05-12 15:38) [0]

В ДЛЛ объявленна функция:
Public Function send_pi(SendDate As String, Value() As Double, pointID As Long) As Long //(ActiveX DLL написана на VB 6.0)
При подключении функции в Delphi она васпринимается как:
send_pi(var SendDate:WideString, var Value:PSafeArray, var pointID:Integer):integer;
При подставлении масива возникает ошибка:
Unit1.pas(112): Types of actual and formal var parameters must be identical
Мастера подскажите как выйти с этой ситуации или где ошибка (только не говорите что в ДНК)

← →
MU (2004-05-13 17:36) [1]

А код?
Где строка 112 из Unit1.pas?

← →
Digitman © (2004-05-13 18:21) [2]

> В ДЛЛ объявленна функция

не в ДЛЛ, а в VBA-модуле некоем ... изволь быть точным

> var Value:PSafeArray

ссылка на ссылку ?

> только не говорите что в ДНК

Нет, конечно не в ДНК! :)
Вопрос сложный, насколько я помню Basic (а познания мои скудны донельзя) конструкция вида:
Value() As Double
задаст массив Double"ов...
(или это указатель на функцию возвращающюю Doudle?)
Что после этого значит PSafeArray?
Скорее всего это автоматически созданный тип: указатель на массив некоего типа.
Поэтому у меня к автору сабжа 2 вопроса:
1) что это за Value() as Double?
2) что за массив подставляется в качестве параметра функции, тем более, что надо подставлять указатель на массив, судя по названию: PSafeArray?

ActiveX DLL и Delphi Найти похожие ветки