Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2003.10.20;
Скачать: [xml.tar.bz2];

Вниз

Импорт из DLL   Найти похожие ветки 

 
Eagle Owl   (2003-10-07 17:27) [0]

Доброго времени суток, мастера!
Проблема такая: есть DLL, написанная на С++ и есть
к ней заголовочный файл(см. ниже).
Как правильно импортировать из неё процедуру, а то я чё-то не пойму.

//--------------------------------------------------------------

#include <sysutils.hpp>
//--------------------------------------------------------------

struct TLosRec
{
int Year;
int Month;
int Day;
};
//--------------------------------------------------------------

struct TInputDates
{
TDateTime AppDate;
TDateTime MisDate;
};
//--------------------------------------------------------------

__declspec(dllimport) void CalcLos(
const TInputDates * AInputDates, const int AInputDates_Size,
TLosRec &ALosRec);
//--------------------------------------------------------------


 
clickmaker   (2003-10-07 17:33) [1]

type
TLosRec = record
Year: integer;
Month: integer;
Day: integer;
end;

TInputDates = record
AppDate: TDateTime;
MisDate: TDateTime;
end;

procedure CalcLos(const AInputDates: TInputDates; AInputDates_Size: integer; var ALosRec: TLosRec); external "DLLFILENAME.DLL";


 
Eagle Owl   (2003-10-07 17:47) [2]

Так пробовал...
Ошибка получается - "Точка входа в процедуру CalcLos не найдена в библиотеке DLL loslib.dll"


 
PVOzerski   (2003-10-07 17:47) [3]

Надо бы еще с calling conventions разобраться. Скорее всего, это значит найти определение __declspec(dllimport).


 
PVOzerski   (2003-10-07 17:50) [4]

Есть еще один момент - name mangling. Возьмите tdump и посмотрите, как фактически выглядит имя функции в dll-и. Если окажется, например, CalcLos@12 или _CalcLos, так и указывайте имя после ключевого слова name.


 
Eagle Owl   (2003-10-07 18:13) [5]

Посмотрел...
Фактически имя такое же, как и в заголовочном файле.
В чём же проблема...


 
clickmaker   (2003-10-07 18:30) [6]

Можно еще по индексу попробовать. tdump"ом определить.

procedure CalcLos(const AInputDates: TInputDates; AInputDates_Size: integer; var ALosRec: TLosRec); external "loslib.dll" index 1;


 
Eagle Owl   (2003-10-07 21:40) [7]

Спасибо, по индексу работает!
Но всё-таки интересно, почему по имени не получается...
Может кто знает?


 
Иван Шихалев   (2003-10-07 22:50) [8]

А если name явно прописать?


 
icWasya   (2003-10-08 09:52) [9]

[7]
>Но всё-таки интересно, почему по имени не получается...
а приведи текст, который выдаёт TDUMP


 
Eagle Owl   (2003-10-08 13:15) [10]

> icWasya © (08.10.03 09:52) [9]
> а приведи текст, который выдаёт TDUMP

TDUMP выдаёт CalcLos(const TInputDates *, const int, TLosRec&)
Пробовал указывать так-же(то-есть с параметрами)
name "CalcLos(const TInputDates *, const int, TLosRec&)"
всё равно не получается...



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

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

Наверх




Память: 0.46 MB
Время: 0.007 c
1-65536
Raduga
2003-10-08 09:28
2003.10.20
вызов инспектора объектов в своей программе


1-65505
Ольга
2003-10-08 08:32
2003.10.20
Господа, подскажите, как решить проблему кодировок в D7?


1-65476
Sergp
2003-10-08 13:48
2003.10.20
Как сгенерировать уникальное имя файла?


1-65447
MadGhost
2003-10-07 14:03
2003.10.20
Помогите с TTreeView


14-65588
Ua
2003-10-02 11:03
2003.10.20
Глупый вопрос по поводу WM





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский