При вызове функции из dll дает ошибку

← →
De (2006-05-04 12:29) [0]

Привет, All!
есть стороняя dll
требуется написать свою dll которая вызвает функции из сторонней

... function Init(a: WideString; b: Integer): Integer; stdcall; external "other.dll"; {$R *.RES} function my_Init(a: WideString; b: Integer): Integer; stdcall; export; begin Init(a, b); end; ...
если из exe вызвается стороняя функция на прямую, все работает, если вызвается моя, функция дает ошибку, почему?
P.S.
передаваемые параметры одинаковые

← →
Сергей М. © (2006-05-04 12:36) [1]

> дает ошибку

Какую ?

← →
Elen © (2006-05-04 12:40) [2]

Привет De.
попробуй в своей ДЛЛ прописать этот код
мне кажется ты неправильно обьявил свою функцию.
И вообще что за ошибку выдает и на каком этапе?
function my_Init(a: WideString; b: Integer): Integer; begin Init(a, b); end exports my_init; Begin end.

← →
De (2006-05-04 12:46) [3]

>Elen
все сделано как у Вас реакция та же

ошибка внутренняя, всмысле функция действует по разному (это коннект в БД) в случае с родной функцией коннект создается в случае с моей оболочкой коннекта нет :(
почему понять не могу, ещё повторю что передаваемые параметры одинаковые

← →
Elen © (2006-05-04 12:52) [4]

Приведи текст ошибки

← →
Desdechado © (2006-05-04 12:55) [5]

на чем написана other.dll ?
точно WideString нужно передавать? может, там все-таки указатель?
а то ведь ShareMem нужен

← →
De (2006-05-04 12:56) [6]

да нету текста
если вызываю функцию на прямую возращает 0 (типа все OK)
если вызываю через свою функцию возращает <>0 (типа ошибка)

в чем разница этих двух вызовов понят не могу, передаваемые параметры идентичны :(

← →
De (2006-05-04 12:58) [7]

>Desdechado
написана на delphi (хотя не уверен, узнать не реально :( )
содержимое строки передалось нормально (в своем вызове лог ввел)

← →
Elen © (2006-05-04 13:00) [8]

С чего ты взял что не 0 это ошибка? это где-то описано?null
Ну попробуй еще так
function my_Init(a: WideString; b: Integer): Integer; begin result:=Init(a, b); end

> нету текста

Так не бывает.

Приводи дословно все что видишь на экране : это, мол, вижу в compile-time, это, мол, - в run-time

> написана на delphi (хотя не уверен, узнать не реально

Абсолютно реально.

> Desdechado ©

> точно WideString нужно передавать? может, там все-таки
>указатель?
> а то ведь ShareMem нужен

Не нужен.

При вызове функции из dll дает ошибку Найти похожие ветки