Как в exe-файл "запихнуть" картинку (jpg)?

← →
dera (2006-01-05 19:35) [0]

← →
dera (2006-01-05 20:01) [1]

...в моем проекте

← →
Alarm © (2006-01-05 20:18) [2]

RES? и несколько других путей

← →
dera (2006-01-05 20:30) [3]

что такое RES и какие другие пути?

← →
Yegorchic © (2006-01-05 20:36) [4]

А вроде, если создать TImage, и прямо в Delphi задать ей путь к картинке, то Delphi сама "запихает" в exe картинку...

← →
Джо © (2006-01-05 20:40) [5]

> Как в exe-файл "запихнуть" картинку (jpg)?
> dera

Зависит от того, как и зачем ее планируется оттуда "выпихивать".

← →
dera (2006-01-05 20:43) [6]

предполагается "випихнуть" картинку из екзешника и сменить картинку рабочего стола

> [6] dera (05.01.06 20:43)

Тогда ищи методы работы с ресурсами. Даже в этом форуме раз в месяц как минимум появляется эта тема.

В общем, там коду-то на несколько строк.
1. Создаешь текстовый файл pictures.rc следующего содержания:
MY_IMAGE jpegimage "image002.jpg"
Первая колонка - уникальный идентификатор ресурса, его "название"
Вторая колонка - тип ресурса, в принципе, можно написать любой свой
Третья колонка - имя файла, содержащего рисунок.

2. Сохраняеш это файл и файл с картинкой в папке проекта. Затем: Project/Add to project... выбираешь тип resources *.rc и включаешь свой файл в проект.

Компилируешь.

3.
Код для извлечения и записи во внешний файл следующий:
var Res: TResourceStream; begin // указываем Instance, идентификатор ресурса и его тип Res := TResourceStream.Create(HInstance,"MY_IMAGE","jpegimage"); try // сохраняем во внешний файл Res.SaveToFile("d:\extracted_file.jpg"); finally Res.Free; end; end;

Как в exe-файл "запихнуть" картинку (jpg)? Найти похожие ветки