Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.02.13;
Скачать: 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 вся ветка

Текущий архив: 2005.02.13;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.05 c
1-1107001817
Progh
2005-01-29 15:30
2005.02.13
Округление чисел


9-1099832251
ASH
2004-11-07 15:57
2005.02.13
Звук для игр на Delphi..


6-1101598415
Змей
2004-11-28 02:33
2005.02.13
поочередная вставка


14-1106577272
Knight
2005-01-24 17:34
2005.02.13
Кто сталкивался с глюком оптической мыши на Win2kServer?


1-1107016985
hamster
2005-01-29 19:43
2005.02.13
Ctrl+Alt