| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Помогите перевести с с++ на Delphi вызов функции из dll ! [D7, WinXP]

jiran ©   (2004-12-06 12:41:00) 

Доброго времени суток !!!!!!
Помогите перевести с с++ на 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.
Помогите разобраться, как правильно надо объявить и использовать эту функцию ?

---

Суслик   (2004-12-06 13:57:00) [1]

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

---

DiamondShark   (2004-12-06 12:45:00) [2]

Либо

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';

---

Наверх