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

Вниз

Ресурсы в 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 который взя из ресурса;




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

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

Наверх




Память: 0.47 MB
Время: 0.032 c
14-69524
Николай Быков
2002-10-31 04:09
2002.11.21
У корпорации Microsoft самое качественное ПО


14-69518
Nikolas SHmuS
2002-11-01 16:31
2002.11.21
Драйвер на FUJITSU MPE3084AE


3-69107
kandid
2002-11-02 14:12
2002.11.21
Откат MsSql server


7-69600
OxOTHuK
2002-09-22 23:23
2002.11.21
ХУКи


6-69471
MK
2002-09-19 14:16
2002.11.21
Как узнать через TidHTTP, требует ли сервер логин и пароль?