Скачать: CL | DM;

Помогите перевести с с++ на Delphi вызов функции из dll !   Найти похожие ветки 

← →
jiran   (2004-12-06 12:41) [0]

Доброго времени суток !!!!!!
Помогите перевести с с++ на Delphi вызов функции из dll !
На С++:
char  value;
gc_GetCallInfo(pline->call[callindex].crn,CONNECT_TYPE,&value);
- она должна вернуть value (value: buffer address where the requested information is stored), остальные параметры входные, функция вызывается из dll, я пытаюсь переветсти на delphi
Описываю функцию:
function gc_GetCallInfo(crn:crn;info_id:Integer;var alue:Pointer):Integer;cdecl;external "c:\LIB\libgc.dll" Name "gc_GetCallInfo";
пытаюсь вызвать:
var value : Integer;
gc_GetCallInfo(pline.call[callindex].crn, CONNECT_TYPE,@value);

и получаю ошибку: Types of actual and format var parameters must be identical.
Помогите разобраться, как правильно надо объявить и использовать эту функцию ?

---

← →
DiamondShark ©   (2004-12-06 12:45) [1]

Либо

function gc_GetCallInfo(crn:crn;info_id:Integer;alue:Pointer):Integer;cdecl;external "c:\LIB\libgc.dll" Name "gc_GetCallInfo";

либо

function gc_GetCallInfo(crn:crn;info_id:Integer;var alue):Integer;cdecl;external "c:\LIB\libgc.dll" Name "gc_GetCallInfo";

---

← →
Суслик ©   (2004-12-06 13:57) [2]

соответственно в последнем примере из [1] при вызове такой функции не надо писать знак @ около value.

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.023 c