Грузим из DLL ресурсы...

← →
I love Warez (2002-06-01 11:31) [0]

Наконец-то я всосал, как грузонуть ресурсы из DLL.
Мужики! Помогите теперь загрузить BMP файл ( StartMine) из DLL в Image1.

procedure TForm1.Button2Click(Sender: TObject); var AModule: THandle; BitMap : TBitMap; begin AModule := LoadLibrary("Images.dll"); BitMap := TBitMap.Create; BitMap.LoadFromResourceName(AModule, "StartMine"); //Вот так не выходит: //Image1.Picture := BitMap; BitMap.Free; FreeLibrary(AModule); end;

Заранее благодарен!

← →
I love Warez (2002-06-01 12:26) [1]

Ну! Мужички!
Это же просто!
Это для меня тупого это сложно, но Вы же - Мастера!

← →
I love Warez (2002-06-01 13:43) [2]

Слабо?

← →
Song © (2002-06-01 15:16) [3]

Симпатяга, :) я тебе дал ответ в другом форуме :)

Этап первый: создание DLL
Создаёшь текстовый файл с расширением .RC и записываешь в него строки такого вида:
----------
<название картинки1> BITMAP <название файла1>
. . .
<название картинкиN> BITMAP <название файлаN>
-------------
запускаешь программу brcc и в качестве параметра --- твой файл, RC-файл и картинки должны храниться в одном каталоге; после компиляции у тебя будет один большой RES-файл.
Затем у себя в программе пишешь:

AModule: THandle; AModule := LoadLibrary(...); <--- параметры посмотри в хелпе Bitmap.LoadFromResourceName(AModule, <название картинки1>); FreeLibrary(AModule); <--- это уже в самом конце

Грузим из DLL ресурсы... Найти похожие ветки