GIF и Graphics32

← →
SerJaNT © (2006-07-27 02:48) [0]

Как загрузить в Image компонента Graphics32 рисунок GIF? Пытался через loadfromfile() но пишет что неверное расширение gif. Использую также GraphicEx

← →
SergProger © (2006-07-27 02:53) [1]

Тебе нужен компонент. Не помню, какой. Извини.

← →
SerJaNT © (2006-07-27 02:55) [2]

> Тебе нужен компонент. Не помню, какой. Извини.

В мануале написано что нужно еще подключить GraphicEx (поддержка изрядного кол-ва форматов) чтобы Graphics32 мог поддерживать и эти форматы, так он эти форматы поддерживает, а вот GIF не хочет.

← →
SergProger © (2006-07-27 03:00) [3]

Ищи здесь - http://www.delphimaster.ru/cgi-bin/forum.pl?n=7&search=gif

← →
SerJaNT © (2006-07-27 03:09) [4]

> Ищи здесь

Уже искал, ничего не нашел=((

← →
SergProger © (2006-07-27 03:13) [5]

Вот тебе код: из файловов GIF (анимированных) вытаскивает каждую картинку в отдельности, или записывает в отдельный BMP по очереди Для этих программок нужен всеми любимый RX Lib (компонент) !!!

procedure TForm1.Button4Click(Sender: TObject);
var
i, a: integer;
bm: TBItmap;
begin
a := 0;
bm := TBItmap.Create;
bm.Height := RxGIFAnimator1.Height;
bm.Width := RxGIFAnimator1.Image.Count * RxGIFAnimator1.width;
for i := 0 to RxGIFAnimator1.Image.Count - 1 do
begin
RxGIFAnimator1.FrameIndex := i;
bm.Canvas.Draw(a, 0, RxGIFAnimator1.Image.Frames[i].Bitmap);
a := a + RxGIFAnimator1.Height;
end;
//form1.Canvas.Draw(0,0,bm);
bm.SaveToFile(Edit1.Text + ".bmp");
bm.free;
end;

← →
SerJaNT © (2006-07-27 03:17) [6]

> SergProger ©

Спасибо, но мне нужно в ImageView компонента Graphics32 загрузить GIF рисунок (простой или анимированный)!

Забыл езе сказать, что если в Object Inspector принудительно указать рисунок GIF то все отображается (ошибка не появляется), а если во время выполнения проги через loadfromfile() то ошибка.

>если в Object Inspector принудительно указать рисунок GIF

проверни то же в программе, через OpenPictureDialog - тот покажет лишь те расширения, что "поддерживаются" твоей прогой. Добавление в uses нужных модулей (например RxGifImage при установленной RxLib) будет расширять список дочтупных графических типов и обеспечивать правильную загрузку

Все, я разобрался! Я использую GraphicEx для расширения количества форматов.

GIF и Graphics32 Найти похожие ветки