Текущий архив: 2008.07.13;
Скачать: CL | DM;
Вниз
Загрузка ресурсов (BITMAP) в приложение Найти похожие ветки
← →
RUYurik (2008-06-09 12:57) [0]Здравствуйте all ! Хочу создать приложение, которое пользовалось бы ресурсами (Bitmap) из DLL. Создал DLL (предварительно сам RC файл создал в Resource Builder), в секцию Bitmap поместил изображения. Как мне в приложении загрузить из DLL эти изображения.
procedure TForm1.Button1Click(Sender: TObject);
var mLib: THandle;
mBMP: TBitmap;
a: THandle;
begin
mLib := LoadLibrary("THINGS.DLL");
mBMP := TBitmap.Create;
mBMP.LoadFromResourceID(mLib,1);
FreeLibrary(mLib);
mBMP.Free;
end;
Resource BITMAP_03_03 not found пишет и все тут (((
← →
RUYurik (2008-06-09 13:22) [1]Переделал DLL (в Resource Builder сделал - Создать Resource-only DLL) - все заработало )))
procedure TForm1.BitBtn1Click(Sender: TObject);
var mLib: THandle;
mBMP: TBitmap;
begin
mLib := LoadLibrary("THINGS.DLL");
mBMP := TBitmap.Create;
mBMP.LoadFromResourceName(mLib,"BITMAP_03_03");
Image1.Picture.Bitmap.Assign(mBMP);
FreeLibrary(mLib);
mBMP.Free;
end;
← →
TForumHelp © (2008-06-13 19:44) [2]Удалено модератором
Примечание: Создание пустых сообщений
Страницы: 1 вся ветка
Текущий архив: 2008.07.13;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.017 c
