Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > C++ Builder > проблема с dll


Автор: Domain 22.4.2010, 12:07
Всем привет. Дело вот в чем. Читал книгу Архангельского, в которой описывалось как работать с dll. Сделал все как было написано.
 Код dll.

UMyDLL.h :
Код

#ifndef _UMYDLL_H
#define _UMYDLL_H

#ifdef __DLL__
#define DLL_EI __declspec(dllexport)
#else
#define DLL_EI __declspec(dllimport)
#endif

extern "C" char* DLL_EI Code_Dec(char*s,char Key); 
#endif



UMyDLL.cpp :
Код

#include <vcl.h>
#include <windows.h>
#pragma hdrstop
#include "UMyDLL.h"
//---------------------------------------------------------------------------
#pragma argsused
int WINAPI DllEntryPoint(HINSTANCE hinst, unsigned long reason, void* lpReserved)
{
        return 1;
}
//---------------------------------------------------------------------------
char* Code_Dec(char*s,char Key)
{
for (int i=0;;i++)
{
 if (s[i]=='\0') break;
 s[i]=s[i] ^ Key;
}
return s;
}


В классе формы 
Код

private:    
HINSTANCE dllInstance;
typedef char (__import*FType(char*,char));
FType * C_D;


Подключение 
Код

dllInstance = LoadLibrary("MyDLL.dll");
if (dllInstance) {
C_D=(FType*)GetProcAddress(dllInstance,"_Code_Dec");
ShowMessage("dll is loaded") ;
}
else ShowMessage("error dll");


Использование 
Код

if (C_D)
Edit1->Text=C_D(Edit1->Text.c_str(),'A');
else {ShowMessage("errrrrorr");}


Вообщем так... При сборке проблем нет, но когда нажимаю на кнопку, чтобы произвести соответствующие действия, мне выдает ошибку "is not a vailid integer value" . При подключении и отключении dll все окей, а как только вызываю эту функцию, вот что получается. И еще в Edit я пишу только текст, никаих цифр. Помоги разобраться в чем проблема

Автор: Peter 22.4.2010, 12:28
Ошибка в названии функции?
Код
GetProcAddress(dllInstance,"_Code_Dec");
а в длл:
Код
char* Code_Dec(char*s,char Key)
Первого знака подчёркивания ведь нет.

Исключение "is not a valid integer value" выбрасывается, видимо, в другом месте, здесь не указанном. Где-то, возможно, используется StrToInt().

Автор: Domain 22.4.2010, 15:40
Цитата(Peter @ 22.4.2010,  12:28)
Исключение "is not a valid integer value" выбрасывается, видимо, в другом месте, здесь не указанном. Где-то, возможно, используется StrToInt().

да нет вроде. кроме того кода что я написал больше ничего нет.

Автор: Peter 22.4.2010, 16:40
А что с именем функции? Если заменить
Код
GetProcAddress(dllInstance,"_Code_Dec");
на
Код
GetProcAddress(dllInstance, "Code_Dec");

Как же другого кода нет? В проекте ведь есть форма, а в форме - поле редактирования? В свойствах поля редактирования не указано ли, что хотят целое число?

Автор: Domain 22.4.2010, 20:05
заменил на    
GetProcAddress(dllInstance, "Code_Dec"); но не помогло. за то нашел почему is not a vailid integer value вылетает. но dll все равно не пашет

Автор: Peter 23.4.2010, 12:09
На старте программы FType * C_D надо инициализировать в NULL. А то там может находиться мусор, и
Код
if (C_D)
будет всегда true.

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)