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

Вниз

Dll с ресурсами   Найти похожие ветки 

 
Dstr ©   (2006-05-10 23:23) [0]

Доброй ночи!!!
Скажите,как достать из библиотеки тот или иной ресурс,например Wav(Битмапы дочтавать я умею)


 
Rouse_ ©   (2006-05-10 23:51) [1]

Также как и битмап, только измени тип ресурса...


 
GanibalLector ©   (2006-05-11 01:01) [2]

Например так :

function SaveOtherDLL(var FileName:String):Boolean;
 var hRes,hResData:THandle;
     Mem:Pointer;
     hFile:Integer;
     Buff   : array [0..MAX_PATH] of Char;
begin
 Result:=False;
 if GetTempPath(SizeOf(Buff),Buff)<>0 then
 begin
   FileName:= StrPas(Buff)+LibName+".tmp";
   if FileExists(FileName) then
   Result:=True else
   begin
     hRes:=FindResource(hInstance,LibName,RT_RCDATA);
     if hRes<>0 then
     begin
       hResData:=LoadResource(HInstance,hRes);
       if hResData<>0 then
       begin
         Mem:=LockResource(hResData);
         hFile:=FileCreate(FileName);
         if hFile<>-1 then
         begin
           if FileWrite(hFile,Mem^,SizeOfResource(hInstance,hRes))<>-1 then
            Result:=True;
           FileClose(hFile);
         end;
       end;
     end;
   end;
 end;
end;
//



 
Dstr ©   (2006-05-11 12:21) [3]

Спасибо за вариант,испробую,а картинки доставать ваще легко там у класса у какогото толи TBitmap толи эшо чето есть спец функция LoadFromResurseID а FindResource я пробовал использовать,но ничего не вышло(прога заканчивалась с ошибкой) токо судя по названию SaveOtherDLL сохраняет ресурсы,а не наоборот,но ето мне тоже пригодится...



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

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

Наверх




Память: 0.47 MB
Время: 0.026 c
2-1155198993
Sania1
2006-08-10 12:36
2006.09.03
Запуск от имени


11-1132301273
BaryVetaL
2005-11-18 11:07
2006.09.03
TKOLTCPClient и TKOLTCPServer вопрос не для новичков...


9-1133771636
@!!ex
2005-12-05 11:33
2006.09.03
OpenGL на ATI и Intel


6-1144008177
Vovanchik
2006-04-03 00:02
2006.09.03
TWebBrowser - прокрутка


2-1155712068
gdaujk
2006-08-16 11:07
2006.09.03
Нужен компонент