Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 04.11.2012, 23:58   #1
belyjj
Пользователь
 
Регистрация: 20.03.2011
Сообщений: 29
По умолчанию конвертация gif в bmp

Кто подскажет как правильно? Использую библиотеку rxlib.
Делаю так
Код:
fr1.Assign(gf1);
//fr1:tBitmap; gf1: TGIFImage;
только почемуто всё закрашивается чёрным. frame[1] выдаёт ошибку. Рисунок такто без анимации.
belyjj вне форума Ответить с цитированием
Старый 05.11.2012, 00:13   #2
Человек_Борща
Старожил
 
Аватар для Человек_Борща
 
Регистрация: 30.12.2009
Сообщений: 11,426
По умолчанию

Цитата:
fr1.Assign(gf1);
А чего вы хотели?
Вы же не станете другим человеком если возьмете себе другое имя. Так-то.

GIF это пачка изображений в одном файле. Вынимайте первый кадр гуфа и скармливайте своему битмапу, Тогда все будет хорошо.
Человек_Борща вне форума Ответить с цитированием
Старый 05.11.2012, 00:17   #3
Аватар
Старожил
 
Аватар для Аватар
 
Регистрация: 17.11.2010
Сообщений: 18,922
По умолчанию

Найти GIFImage в инете, а он там есть. Rx? Совсем не уверен, что он gif поддерживает
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию
Аватар вне форума Ответить с цитированием
Старый 05.11.2012, 22:45   #4
belyjj
Пользователь
 
Регистрация: 20.03.2011
Сообщений: 29
По умолчанию

Цитата:
Вынимайте первый кадр гуфа и скармливайте своему битмапу
А не подскажете как это сделать? fr1.Assign(gf1.frame[0]); ?
belyjj вне форума Ответить с цитированием
Старый 05.11.2012, 23:51   #5
raxp
Старожил
 
Регистрация: 29.09.2009
Сообщений: 9,713
По умолчанию

........GDI+
Разработки и научно-технические публикации :: Видеоблог :: Твиттер
Radar systems engineer & Software developer of industrial automation
raxp вне форума Ответить с цитированием
Старый 07.11.2012, 16:05   #6
SERG1980
Участник клуба
 
Аватар для SERG1980
 
Регистрация: 28.03.2007
Сообщений: 1,814
По умолчанию

Цитата:
Сообщение от belyjj Посмотреть сообщение
А не подскажете как это сделать? fr1.Assign(gf1.frame[0]); ?
если используете библиотеку RxLib то:
Код:
 bmp.Assign(form1.RxGIFAnimator1.Image.Frames[1].Bitmap);
если использовать модуль GifImage то:
Код:
procedure TForm1.Button1Click(Sender: TObject);
var bmp:TBitMap;
    gif:TGifImage;
begin
 bmp:=tbitmap.Create;
 gif:=TGifImage.Create;
 gif.LoadFromFile('d:\look3.gif');
 bmp.Assign(gif.Images.Items[1]);
 form1.Canvas.Draw(0,0,bmp);
 FreeAndNil(bmp);
 FreeAndNil(gif);
end;

Последний раз редактировалось SERG1980; 07.11.2012 в 16:11.
SERG1980 вне форума Ответить с цитированием
Старый 07.11.2012, 16:40   #7
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,229
По умолчанию

SERG1980, я абсолютно не разбираюсь в данной теме (зашёл, чтобы узнать новое для себя).
Вызывает подозрение вот это:
Цитата:
Код:
 bmp.Assign(form1.RxGIFAnimator1.Image.Frames[1].Bitmap);
...
 bmp.Assign(gif.Images.Items[1]);
неужели нумерация фреймов идёт от единицы, а не от нуля, как следовало бы ожидать?!
Serge_Bliznykov вне форума Ответить с цитированием
Старый 07.11.2012, 23:45   #8
SERG1980
Участник клуба
 
Аватар для SERG1980
 
Регистрация: 28.03.2007
Сообщений: 1,814
По умолчанию

Цитата:
Сообщение от Serge_Bliznykov Посмотреть сообщение
SERG1980, я абсолютно не разбираюсь в данной теме (зашёл, чтобы узнать новое для себя).
Вызывает подозрение вот это:

неужели нумерация фреймов идёт от единицы, а не от нуля, как следовало бы ожидать?!
Serge_Bliznykov я просто указал единицу в качестве примера
SERG1980 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Конвертер из png в jpg или gif или bmp Квэнди Мультимедиа в Delphi 8 04.10.2011 22:26
Gif-файл из ресурса, Анимированый Gif volod3000 Мультимедиа в Delphi 6 13.07.2011 23:24
Ищу компонент конвертер(Bmp, Png, Tif, Gif...) в Jpeg ArtGrek Компоненты Delphi 16 25.05.2011 10:05
КОНВЕРТАЦИЯ TChar в bmp MOMOTOCHEK Помощь студентам 2 21.03.2011 06:51
Конвертация ICO в BMP DeDoK Общие вопросы Delphi 5 15.07.2008 23:44