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

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

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

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 25.09.2023, 18:16   #1
Kronos913
Форумчанин
 
Регистрация: 10.02.2021
Сообщений: 627
По умолчанию Чтение gif

Возникла проблема при открытии gif-анимации - все изображения после нулевого открываются криво
Как сделать так, чтобы получить дальнейшие картинки в нормальном виде?
Код:
      gif.LoadFromFile(s);

      k:=gif.Images.Count;

      bmp:=TBitMap.Create;
      bmp.Assign(gif.Images[0]);
      Image1.Picture.Assign(bmp);

      bmp.Assign(gif.Images[k div 3]);
      Image2.Picture.Assign(bmp);

      bmp.Assign(gif.Images[k-1]);
      Image3.Picture.Assign(bmp);
Изображения
Тип файла: jpg изображение_2023-09-25_181429708.jpg (49.1 Кб, 0 просмотров)
Kronos913 вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Чтение mp3 Predator199 PHP 5 04.09.2012 19:28
Чтение из INI Centrinar Общие вопросы Delphi 1 01.01.2012 22:09
чтение XML beemoto Общие вопросы Delphi 19 16.10.2011 11:54
Чтение MDL Gr@nd Общие вопросы Delphi 0 08.06.2009 06:58
Чтение, чтение и еще раз чтение Alex Cones Общие вопросы Delphi 3 07.06.2009 15:28