| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

ресурсы в dll-ке

SashkoSoft ©   (2005-01-26 13:16:00) 

Господа, поястните, почему не работает такая конструкция:

tmpResStream2 : TResourceStream;
tmpH2:THandle;
tsl:Tstringlist;

begin

tsl.Create;
tmpH2:=LoadLibrary(PChar('my.dll'));
tmpResStream2 := TResourceStream.CreateFromID(tmpH2,2, RT_RCDATA);
tsl.LoadFromStream(tmpResStream2);

my.dll содержит только файл ресурсов default.RES созданый таким образом.
1 RCDATA "pic.jpg"
2 RCDATA "info.txt"

---

Chlavik   (2005-01-26 15:50:00) [1]

pic RCDATA pic.jpeg

...

tmpResStream2 : TResourceStream;
tmpH2:THandle;
tsl:Tstringlist;

begin

tsl.Create;
try
tmpH2:=LoadLibrary(PChar('my.dll'));
try
 tmpResStream2 := TResourceStream.Create(tmpH2,'pic',RT_RCDATA);  
 tsl.LoadFromStream(tmpResStream2);
finally
 tmpResStream2.Free;
end;

finally
 tsl.Free;
end;

---

Наверх