Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как вшивать ресурсы в ехе-шник [D6, WinXP]


Beeper ©   (2002-07-12 23:01:00) 

Как вшивать ресурсы в ехе-шник (в смысле любые данные, файлы) и как к ним обращаться? Если объяснять много, киньте линк хотябы где это можно почитать.


Beeper   (2002-07-14 22:37:00) [1]

Ага, вроде ясно.
А что если надо не извлечь его (ресурс), как делает этот код, а просто считать его (ну например проиграть ранее упакованный в ехе-шник видео или звук, вставить где нибудь картинку)?
И что за тип ресурса? Он жестко привязан к типу вшиваемого файла или можно писать как хочешь?
Спасибо.


MARcoDEN   (2002-07-14 11:12:00) [2]

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

implementation
{$R *.DFM}
{$R prog.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
// Записывает в текущую папку PROG.exe
ExtractRes("EXEFILE", "PROG", "PROG.EXE");
end;


Наверх

Титульная страница Поиск, карта сайта Написать письмо