IPB
ЛогинПароль:

> ВНИМАНИЕ!

Прежде чем задать вопрос, смотрите FAQ.
Рекомендуем загрузить DRKB.

Наладить общение поможет, если вы подпишитесь по почте на новые темы в этом форуме.

 
 Ответить  Открыть новую тему 
> Внедрение файлов в Exe
сообщение
Сообщение #1


Новичок
*

Группа: Пользователи
Сообщений: 19
Пол: Мужской
Реальное имя: Павел

Репутация: -  0  +


Написал программу, в ней используются изображения bmp.
Например: Image1.Picture.LoadFromFile('.\images\image.bmp');
Можно-ли это изображение внедрить в exe файл? И каким образом это можно сделать...

Извиняюсь, что не в том раделе, неувидел, удалить не нашел...

Сообщение отредактировано: Koresh -
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #2


Гость






Скачай Drkb
Там есть тема "Системные функции и WinAPI" -> "Windows" -> "Работа с ресурсами" -> "Как поместить JPEG-картинку в exe-файл и потом загрузить ее?"
 К началу страницы 
+ Ответить 
сообщение
Сообщение #3


Новичок
*

Группа: Пользователи
Сообщений: 19
Пол: Мужской
Реальное имя: Павел

Репутация: -  0  +


Спасибо, с этим разобрался. Тут возник другой вопрос...
У меня 16 картинок 0.bmp, 1.bmp и т. д.
Надо, чтобы было вроде этого:
ImageBoard[i,j].Picture.Bitmap.Handle:=LoadBitmap(HInstance, 'PIC'+IntToStr(board[i,j]));
PIC* - это я так в res-файле назвал... *-название файла, т. е. 0, 1, 2 и т. д.
Вся проблема в том, что несоответствие типов, так как это не string, а PAnsiChar...
Как такую проблему решить? Можно конечно через case, но не рационально...
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #4


Гость






:= LoadBitmap(HInstance, PChar('PIC'+IntToStr(board[i,j])));

?
 К началу страницы 
+ Ответить 
сообщение
Сообщение #5


Новичок
*

Группа: Пользователи
Сообщений: 19
Пол: Мужской
Реальное имя: Павел

Репутация: -  0  +


Все ясно, спасибо smile.gif

Сообщение отредактировано: Koresh -
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 





- Текстовая версия 22.09.2020 13:05
500Gb HDD, 6Gb RAM, 2 Cores, 7 EUR в месяц — такие хостинги правда бывают
Связь с администрацией: bu_gen в домене octagram.name