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

Вниз

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

 
ЗлойЕНОТ ©   (2007-02-24 19:49) [0]

У меня тут вопрос один возник, нигде не могу найти ответа. Вопрос следующий: можно ли восстановить файл из RES в его исзначальном виде? И если можно, то как это сделать?


 
Leonid Troyanovsky ©   (2007-02-25 08:55) [1]


> ЗлойЕНОТ ©   (24.02.07 19:49)  

>  Вопрос следующий: можно ли восстановить файл из RES в его
> исзначальном виде? И если можно, то как это сделать?

В изначальном, т.е. *.rc? Нельзя.
А вытащить из него ресурсы - возможно.
Есть много программ для этого, скажем, dede, restorator.

Если имеющаяся программа, например, ..\demos\resxplor\,
не понимает res, можно для начала сделать dll.

--
Regards, LVT.


 
ЗлойЕНОТ ©   (2007-02-26 12:36) [2]

Спасибо за посказку, попозже сам догнал как это сделать. Хотя может я не совсем правильно вопрос задал...
Если интересно то вот:

var
 ResStream: TResourceStream;
 FileStream: TFileStream;
begin
 try
   ResStream := TResourceStream.CreateFromID(HInstance, 1, RT_RCDATA);
   try
     FileStream := TFileStream.Create(FileName, fmCreate);
     try
       FileStream.CopyFrom(ResStream, 0);
     finally
       FileStream.Free;
     end;
   finally
     ResStream.Free;
   end;
 except
   on E:Exception do
   begin
     DeleteFile(FileName);
     raise;
   end;
 end;
end;

где  
    "1" и "RT_RCDATA" - параметры ресурса,
    "FileName" - Имя файла, например С:\Run.exe



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

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

Наверх




Память: 0.47 MB
Время: 0.041 c
11-1150512041
parovoZZ
2006-06-17 06:40
2007.03.18
demomodalvcl2koldll - вовсе и не модал


2-1172663875
tan
2007-02-28 14:57
2007.03.18
Работа с OpenOffice.


2-1172086085
danila_master
2007-02-21 22:28
2007.03.18
PNG в Delphi


15-1172361804
SerJaNT
2007-02-25 03:03
2007.03.18
Проблема с сетью в Win2000 server


15-1171746781
Цукор5
2007-02-18 00:13
2007.03.18
мать(440BX) с винтом на 40G...