Форум: "Основная";
Текущий архив: 2002.08.22;
Скачать: [xml.tar.bz2];
Вниз
Добавить картинку в исполняемый файл Найти похожие ветки
← →
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;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.008 c
