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

ресурсы в dll-ке   Найти похожие ветки 

← →
SashkoSoft ©   (2005-01-26 13:16) [0]

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

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) [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;

---

Страницы: 1 вся ветка

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



Память: 0.44 MB
Время: 0.024 c