
23.05.2007, 09:59
|
|
Участник форума
Регистрация: 09.12.2006
Сообщений: 135
Провел на форуме: 426226
Репутация:
726
|
|
Astral_Master
Текст в myres.rc
LORDPE RAR Lordpe.rar
DATA DAT Data.dat
Получаем myres.res
Выполняем brcc32.exe myres.rc
//brcc32.exe там же, где и Delphi.exe
Код:
rar:=TResourceStream.Create(Hinstance,'LORDPE','RAR');
x:=Dword(rar.Memory); //адрес ресурса в памяти
y:=int64(rar.Size); //размер ресурса
rar:=TResourceStream.Create(Hinstance,'DATA','DAT');
x:=Dword(rar.Memory); //адрес ресурса в памяти
y:=int64(rar.Size); //размер ресурса
rar.SaveToFile('my.rar'); //можно использовать так
|
|
|