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

Вниз

Как извлеч ресурс из программы в отдельный файл?   Найти похожие ветки 

 
myportal   (2002-01-19 10:00) [0]

В программе есть ресурс 1.res я пробовал извлечь его в файл,
но программа висла. Делал через TResourceStream и сохранял в файл. Может кто нить подскажет с примером?


 
MARcoDEN ©   (2002-01-19 12:32) [1]

1. Пишем в блокноте RC-файл, куда прописываем все нужные нам программы, например: ZIP EXEFILE C:\ZIP.EXE
2. Компилируем его в ресурс при помощи Brcc32.exe. Получаем RES-файл.
3. Далее в тексте нашей программы:

implementation
{$R *.DFM}
{$R test.res} //Это наш RES-файл
procedure ExtractRes(ResType, ResName, ResNewName : String);
var
Res : TResourceStream;
begin
Res := TResourceStream.Create(Hinstance, Resname, Pchar(ResType));
Res.SavetoFile(ResNewName);
Res.Free;
end;
procedure TForm1.BitBtn1Click(Sender: TObject);
begin // Записывает в текущую папку zip.exe
ExtractRes("EXEFILE", "ZIP", "ZIP.EXE");
end;

Удачи!



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

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

Наверх




Память: 0.46 MB
Время: 0.006 c
6-8969
Hawk
2001-11-11 20:20
2002.02.04
Разрыв связи между TServerSocket и TClienSocket


4-9045
DKeeper
2001-12-06 08:21
2002.02.04
Как узнать handle поля ввода чужого окна?


3-8801
Oleg Fomicheff
2001-12-31 05:18
2002.02.04
Не могу создать индекс с параметром Unique ;(((


7-9008
Vitaliy Jungle
2001-10-13 05:42
2002.02.04
Гребаный MSDOS


4-9021
Art
2001-12-06 13:52
2002.02.04
Помогите!Есть проблема программным выключением компа!!!?