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

Вниз

Tmenu + TResourceStream + TBitmap   Найти похожие ветки 

← →
diabolik_krsk   (2005-03-15 05:05) [0]

Подскажите как решить!

Есть такой код (взят из примера в инете). Ресурсный файл с bitmap скомпилирован в плагин (по сути - та же dll но с другим расширением).


procedure PlugLoad;
var Res: TResourceStream;
   Item: TMenuItem;
   PlugName: function: PChar;
   Handle: THandle;
begin
 Item := TMenuItem.Create(MainMenu);
 Handle := LoadLibrary(PChar(FileName));
 // код загрузки плагина
 // загрузка bitmap из ресурса плагина
 Res := TResourceStream.Create(handle,"image",rt_rcdata);
 Res.saveToFile("temp.bmp");
 Res.free;
 Item.Bitmap.LoadFromFile("Temp.bmp");
 FreeLibrary(handle);
 Mainmenu.items[3].add(Item);
end;


В коде bitmap выдергивается из ресурса и пишется во временный файл. А потом в пункт меню добавляется загрузкой этого файла.
Подскажите как обойти процедуру создания временного файла и напрямую завязать загрузку bitmap из ресурса в пункт меню без создания промежуточного файла??

---

← →
Набережных С. ©   (2005-03-15 08:24) [1]

Bitmap.LoadFromStream. Про позицию не забудь.

---

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

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

Наверх

Память: 0.46 MB
Время: 0.043 c