Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2010.08.27;
Скачать: [xml.tar.bz2];

Вниз

Загрузка изображения из Resources   Найти похожие ветки 

 
girichev   (2010-03-06 15:18) [0]

Сейчас изображение загружается из файла (работает):
img := TGPBitmap.Create(extractfilepath(Application.ExeName)+"background.png", True);

Но, в идеале хочется загружать изображение из ресурса программы (изображение добавлено, "Background", RCData), при этом я что-то не правильно делаю.


hResource: THandle;
pData: Pointer;

hResource := LoadResource(hInstance, FindResource(hInstance, "Background", RT_RCDATA));
 try
   pData := LockResource(hResource);
   if pData = nil then
     raise Exception.Create("Cannot read Background");
      img := TGPBitmap.Create(hResource); // как здесь правильно будет?
 finally
   FreeResource(hResource);
 end;


Изображение загружено в ресурс:
Background RCData "background.png"


 
Игорь Шевченко ©   (2010-03-06 15:23) [1]

TResourceStream


 
girichev   (2010-03-06 16:37) [2]

Не разобрался, к сожалению, можете дать более развернутый ответ, пожалуйста?


 
Плохиш ©   (2010-03-06 17:20) [3]

В первой же ссылке в гугле очень даже "развернутый ответ"



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

Форум: "Начинающим";
Текущий архив: 2010.08.27;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.44 MB
Время: 0.072 c
2-1268130767
fford
2010-03-09 13:32
2010.08.27
передача TStream из DLL


2-1269889255
HRustBB
2010-03-29 23:00
2010.08.27
Нужен компонент для отображения схеммы данных


10-1167245489
red123
2006-12-27 21:51
2010.08.27
com сервер с формой


6-1218021112
StranNik
2008-08-06 15:11
2010.08.27
Вопрос по IdHTTPProxyServer


15-1269551843
boa_kaa
2010-03-26 00:17
2010.08.27
Броузеры: очередное соревнование





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский