Tmenu + TResourceStream + TBitmap [D6, Win2k]
diabolik_krsk © (2005-03-15 05:05:00)
Подскажите как решить!
Есть такой код (взят из примера в инете). Ресурсный файл с
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:00) [1]
Bitmap.LoadFromStream. Про позицию не забудь.
Наверх 
ЧАТ |
Орешник |
|
