Ресурсы в EXE

← →
Anar (2002-11-06 08:38) [0]

Я создал rc файл такого типа:

IMAGE1 RCDATA image1.jpg
IMAGE2 RCDATA image2.jpg
MUSIC1 RCDATA music.mp3
и т.д

Откомпилировал его в res файл с помощью brc32.
В программе прилинковал его так: {$R myres.res}

Теперь как загрузить из этого ресурса скажем IMAGE1 и проиграть MUSIC1?

← →
MBo (2002-11-06 09:00) [1]

проще всего TResourceStream использовать.
Причем mp3, видимо, придется сохранять на диск

← →
Anar (2002-11-06 13:51) [2]

Пусть будет не MP3, а txt. Я где-то в нете прочитал про это, но там пример прилагался но он не работал. Ты сам делал так? Может пример привидёшь?

← →
Mirovodin (2002-11-06 14:02) [3]

http://delphigfx.mastak.ru/2d/015/2d_15.htm

← →
MBo (2002-11-06 14:02) [4]

TResourceStream.Create создаст поток, содержащий указанный в параметрах ресурс. Теперь содержимое можно скопировать в другой поток, сохранить на диск, прочитатать из него данные. Все в хелпе есть

← →
Неизвестный (2002-11-10 09:06) [5]

function ResBmp(ResI: Integer): TBitMap;
var
ResStream: TResourceStream;
Image: TBitMap;
MyJpeg: TJpegImage;
begin
ResStream := TResourceStream.CreateFromID(HInstance, ResI, RT_RCDATA);
Image := TBitMap.Create;
MyJpeg := TJpegImage.Create;
MyJpeg.LoadFromStream(ResStream);
Image.Assign(MyJpeg);
Result := Image;
end;

Вызов:
Brush.Bitmap := ResBmp(1) - делает фон формы из рисунка Jpg который взя из ресурса;

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