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

Вниз

Добавить картинку в исполняемый файл   Найти похожие ветки 

 
besen-ok ©   (2002-08-12 11:25) [0]

Нет желания с exe’шником постоянно таскать 2 картинки неудобно ! пытаюсь вкомпилировать картинки в исполняемый файл (картинки включил в список ресурсов проекта):

RStr:TResourceStream;
BMap:TBitmap;
begin
RStr := TResourceStream.Create(HInstance,"BITMAP_1",RT_BITMAP);
BMap := TBitmap.Create;
BMap.LoadFromStream(RStr);

При выполнении пишет, Bitmap Image is not Valid !

Что я не так делаю !


 
Vitalik ©   (2002-08-12 11:51) [1]

Я по-моему делал прямо так, и насколько я помню, работало:
var
b: TBitmap;
begin
b: TBitmap.create;
b.LoadFromResourceName(hInstance, "picture");
end;


 
KPY ©   (2002-08-12 15:36) [2]

ну как получилось?


 
KPY ©   (2002-08-13 06:55) [3]

procedure LoadJPEGfromEXE;
var
Bitmap : TBitMap;
begin
Bitmap := TBitmap.Create;
try
with Bitmap do begin
BitMap.Handle := LoadBitmap(HInstance,"BITMAP1");
Form1.Canvas.Draw(50,50,BitMap);
end;
finally
Bitmap.Free;
end;

файл *.rs
BITMAP1 BITMAP Pricol.bmp




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

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

Наверх




Память: 0.47 MB
Время: 0.01 c
6-71284
edvin
2002-06-10 17:26
2002.08.22
Disconnect в Сокетах


4-71429
IKarikh
2002-06-19 18:59
2002.08.22
Семафоры


4-71425
Грифон
2002-06-18 01:22
2002.08.22
Нажатие кнопки в чужом окне


14-71341
Sergo
2002-07-27 08:54
2002.08.22
TeeChart


1-71140
restless
2002-08-09 15:28
2002.08.22
Повернуть DBNavigator