Вниз
Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.023 c
3-1109367926
kserg
2005-02-26 00:45
2005.03.27
есть поле со значениями -1,0,1,2,3.....и т.д.


1-1110818082
nes
2005-03-14 19:34
2005.03.27
Связь 2-х компов....


1-1110790309
Sanich
2005-03-14 11:51
2005.03.27
Экспорт изFastReport.


3-1109152784
juice
2005-02-23 12:59
2005.03.27
Выборка из набора данных


1-1110369690
Tashtagol
2005-03-09 15:01
2005.03.27
TTreeView и TStringGrid




   Наверх