Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.08.13;
Скачать: CL | DM;

Вниз

DLL в DLL(в качестве ресурса)   Найти похожие ветки 

 
GanibalLector ©   (2006-04-19 13:48) [0]

Есть библиотека с ресурсом. В ресурсе еще одна библиотека.
Соответственно,при вызове некоторой ф-ции из библиотеки, я извлекаю ресурс...сохраняю его...вызываю некоторые ф-ции. Выглядит примерно так :

const rName = "Lib_1";

function SaveOtherDLL:Boolean;
 var hRes,hResData:THandle;
     hFile : Integer;
     Mem:Pointer;
begin
 Result:=False;
 hRes:=FindResource(hInstance,rName,RT_RCDATA);
 if hRes<>0 then
 begin
   hResData:=LoadResource(HInstance,hRes);
   if hResData<>0 then
   begin
     Mem:=LockResource(hResData);
     hFile:=FileCreate(rName+".dll");
     if hFile<>-1 then
     begin
       FileWrite(hFile,Mem^,SizeOfResource(hInstance,hRes));
       FileClose(hFile);
       Result:=True;
     end;
   end
 end;
end;

function Add2(const A:Byte):Byte;stdcall;
 var hDLL:THandle;
begin
 if SaveOtherDLL then
 begin
   hDLL:=LoadLibrary(rName+".dll");
   if hDLL<>0 then
   begin
     // вызываю ф-ции из биб-ки,которая является ресурсом
   end;
 end;
 Result:=Result+1;
end;


 
GanibalLector ©   (2006-04-19 13:48) [1]

НО !!! На мой взгляд, нужно слишком много действий делать связанных с проверкой сохранения.(т.е. вдруг это CD, вдруг это библиотека уже загружена, удалять...а она не удаляется и пр. )

Хотелось бы, ресурс в виде библиотеки не сохранить вообще, а сразу  загружать. Но LoadLibrary требует путь к библиотеке :( Подскажите,можно ли решить мою проблему ???

Заранее спасибо!


 
Rouse_ ©   (2006-04-19 14:07) [2]

Писать свой загрузчик: http://www.rsdn.ru/article/baseserv/peloader.xml



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

Текущий архив: 2006.08.13;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.047 c
15-1152966794
Кручен-Верчен
2006-07-15 16:33
2006.08.13
Переустановка WINDOWS.


3-1149767124
DVM
2006-06-08 15:45
2006.08.13
Логический тип данных и три состояния CheckBox в Access


15-1153240882
OSokin
2006-07-18 20:41
2006.08.13
Мертвое железо


2-1153393476
C@N
2006-07-20 15:04
2006.08.13
Клавиатурный вопрос...


10-1122965770
KVA
2005-08-02 10:56
2006.08.13
встраивание ActiveX формы