Вниз
Скачать: CL | DM;

Загрузка ресурсов RC_DATA   Найти похожие ветки 

 
nc   (2004-12-21 19:08) [0]

Имеется ехешник, из коророго я сделал ресурс типа RC_DATA. Гружу его методами:
FindResource
LoadResource.

Вопрос: как мне сохранить ехе файл на диске, если я получаю корректно результат hGlobal от ф-ции LoadResource ?

Спасибо!!

П.С. Интересует ТОЛЬКО винапи реализация


 
nc   (2004-12-21 19:09) [1]

HResInfo := FindResource(0, "TBAR", RT_RCDATA);
 HGlobal := LoadResource(0, HResInfo);

Как используя HGlobal + ВинАпи сохранить ехе опять на диск?


 
Anton_K ©   (2004-12-21 19:15) [2]

LockResource(HGlobal)-указатель на данные
SizeOfResource(HResInfo)-размер данных


 
nc   (2004-12-21 19:19) [3]

Это я знаю... Ты подскажи плз на примере как с помощь этого файл создать... Без стримов и прочих делфевских вещей...


 
Anton_K ©   (2004-12-21 19:22) [4]

CreateFile, WriteFile.


 
nc   (2004-12-21 19:28) [5]

Т.е. используя WriteFile, hGlobal надо подставлять в первый параметр (hFile) ? Или как?


 
Anton_K ©   (2004-12-21 19:38) [6]

var f:Cardinal;
...
f:=CreateFile(имя файла,GENERIC_WRITE,0,nil,CREATE_ALWAYS,FILE_ATTRIBUTE_NORMAL,0);
WriteFile(f,LockResource(HGlobal),SizeOfResource(HResInfo),Cardinal(nil^),nil);
CloseHandle(f);


Примерно так.


 
Anton_K ©   (2004-12-21 19:44) [7]

То есть WriteFile(f,LockResource(HGlobal)^,SizeOfResource(HResInfo),Cardinal(nil^),nil);



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.029 c
1-1105967375
tolstiak
2005-01-17 16:09
2005.02.06
В TEdit - одни цифры и ОДНА запятая?


9-1099481937
ilopX
2004-11-03 14:38
2005.02.06
Скажите где найти хорошую инфу по DelphiX_d7.


6-1101558159
XGarik
2004-11-27 15:22
2005.02.06
Уведомление о прочтении мыла


9-1099655298
Ландграф Павел
2004-11-05 14:48
2005.02.06
У меня сменили пароль на ник


1-1106386713
Sicilla
2005-01-22 12:38
2005.02.06
Кодирование темы в письме e-mail




   Наверх