Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 11.05.2010, 19:29   #11
$T@LKER
Форумчанин
 
Аватар для $T@LKER
 
Регистрация: 28.03.2009
Сообщений: 393
По умолчанию

Нашол в чём проблема! Нужо вместо

Код:
function arenda() : byte;
function test() : byte;
external 'project2.dll';
так вот:

Код:
function arenda() : byte; stdcall;
external 'project2.dll';
function test() : byte; stdcall;
external 'project2.dll';
Я просто незнал!
""Сериалы и компьютерные игры это словно вторая жизнь, которою ты проживаешь, во главе главного героя или персонажа, параллельно своей!""
$T@LKER вне форума Ответить с цитированием
Старый 11.05.2010, 21:12   #12
raxp
Старожил
 
Регистрация: 29.09.2009
Сообщений: 9,713
По умолчанию

динамическое подключение DLL:
Код:

key:function(pid,par: dword):pchar;stdcall;LibHandle: THandle; 

implementation

begin
 //динамический вызов
 @key:=nil;
 s:= ExtractFilePath(paramstr(0))+ 'skin\plugins\ra_'+name+'.dll';
 if not fileexists(s) then
  show_tn(2,'Не обнаружен плагин: ra_'+name+'.dll','RAMEDIA');
 //
 LibHandle:= LoadLibrary(pchar(s));
 if LibHandle>= 32 then
  begin
   @key:= GetProcAddress(LibHandle,'key');
   if @key<> nil then result:= string(key(pid,par));
  end;
 //освобождение памяти
 FreeLibrary(LibHandle)
end;
обмен сообщениями в блоге на форуме
Разработки и научно-технические публикации :: Видеоблог :: Твиттер
Radar systems engineer & Software developer of industrial automation
raxp вне форума Ответить с цитированием
Старый 11.05.2010, 21:40   #13
$T@LKER
Форумчанин
 
Аватар для $T@LKER
 
Регистрация: 28.03.2009
Сообщений: 393
По умолчанию

Сложнуватый код! Динамичеськое подключение пока затрагивать небуду наверное!
""Сериалы и компьютерные игры это словно вторая жизнь, которою ты проживаешь, во главе главного героя или персонажа, параллельно своей!""
$T@LKER вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Ошибка при создании DLL drknn Общие вопросы Delphi 5 30.04.2010 11:02
Ошибка при выхове функций Bass.dll из другой DLL SalasAndriy Общие вопросы Delphi 7 21.10.2009 23:36
Ошибка при создании типа Monte-Kristo Помощь студентам 4 04.03.2009 19:51