Как прочитать картинку GIF из DLL?

← →
alles © (2006-08-11 11:35) [0]

Здраствуйте.
С bitmap-ами разбирался, вот так
Glyph.LoadFromResourceName(NewHndl,"Edit");
а с GIF говорит что нету такое имя в ресурсе
спасибо

← →
Сергей М. © (2006-08-11 11:46) [1]

А при чем здесь DLL ?

← →
alles © (2006-08-11 11:52) [2]

сделал текстовой файл aaa.rs в котором писАл
steps GIF "C:\GIF\steps.gif"
компилил этот файлик с утилиткой brcc32.exe и получил рес файл.
И потом в DLL-ке включил ааа.res

← →
Desdechado © (2006-08-11 11:54) [3]

steps
"Edit"
несколько отличаются, не правда ли?

← →
alles © (2006-08-11 11:57) [4]

2 Desdechado © (11.08.06 11:54) [3]
я писал в 1 про бмп, поменял я в steps как надо

← →
Сергей М. © (2006-08-11 11:59) [5]

TBitmap не работает с GIF-форматом

Цитата из исходников:

procedure TBitmap.LoadFromResourceName(Instance: THandle; const ResName: string);
var
Stream: TCustomMemoryStream;
begin
Stream := TResourceStream.Create(Instance, ResName, RT_BITMAP);
try
ReadDIB(Stream, Stream.Size);
finally
Stream.Free;
end;
end;

← →
Desdechado © (2006-08-11 12:28) [6]

> с GIF говорит что нету такое имя в ресурсе
так и говорит?
текст ошибки какой?
нужно подключить спецмодуль от сторонних производителей для работы с GIF в TImage

← →
alles © (2006-08-11 12:47) [7]

текст ошибки какой?
Project k.exe raised exception class EResNotFound with message "Resource steps not found". Process stopped. Use Step or Run to continue.
нужно подключить спецмодуль от сторонних производителей для работы с GIF в TImage
я использую компонент TAdvImage который может показывать GIF файлы. Блин, через метод LoadImage(FileName) работает. Может как-то через TStream его грузить чтоли?

можно и так. в [5] намекнули. осталось покурить хэлп немного.

ребята нашел хэндл картинки из длл-ки и создал Stream вот так
NewHndl:=LoadLibrary("util.dll");
qResStream := tResourceStream.Create( NewHndl, "steps",RT_RCDATA);
AdvImage1.Picture.Graphic.LoadFromStream(qResStream); << Тут дает AV
Так понял что AdvImage1.Picture.Graphic еше не создан, как его создать. Я нашел в инете пример как работать с TJPEGImage и там он создается так
Image1.Picture.Graphic:=TJPEGImage.Create
но это у меня не получяется дает AV
AdvImage1.Picture.Graphic:=TGraphic.Create;

все получилось, вопрос закрыт

Как прочитать картинку GIF из DLL? Найти похожие ветки