Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.11;
Скачать: [xml.tar.bz2];




Вниз

Fortran Dll 


MBo   (2002-01-26 09:14) [0]

Имеется чужая Dll, и к ней *.lib - маленькая.
Есть описание вызова функций из Cи и фортрана
*.h и *.inc нет.
вызов функции из фортрана выглядит так-
i=iffgetsca("var",x)
первый пар. - строка до 128 символов,имя переменной, второй-double precision, принимает значение переменной.
из Cи
i=iff_getscalar("var",x);
в дампе dll-ки в списке экспорта есть
00002130 7 0003 IFFGETSCA
...
000227B0 21 0014 _iff_get_scalar@8

*.lib, насколько я понимаю, пользуется той же dll, в libе есть имя dll-ки.

описываю
function IFFGETSCA(p:pchar;var x:double):integer;stdcall;
external "ifeffit_10.dll";
при вызове в X мусор.

при замене stdcall на cdecl и пр. - недопустимая операция

если описываю iff_getscalar - не находит эту функцию

как вызвать _iff_get_scalar@8 ?

какие соглашения надо использовать, как передавать строку?



MBo   (2002-01-28 09:05) [1]

.




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.11;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.71 MB
Время: 0.013 c
7-32363           griffon               2001-11-04 00:54  2002.02.11  
скрыть Task bar


3-32166           ГС ТОФ                2002-01-16 14:38  2002.02.11  
Пропала форма в проекте


14-32334          petr_v_a              2001-12-21 17:13  2002.02.11  
Алгоритм подсчета контрольной цифры ИНН


1-32276           IronHawk              2002-01-24 16:35  2002.02.11  
И снова проблема .... многоуважаемые Мастера ! ! !


1-32197           sasa_verman           2002-01-29 14:32  2002.02.11  
TClientDataSet нужно заполнить ланими из масива, а сам ДатаСет никчему не привязан