"Использование GIF файлов" - это больная тема для Бюлдеровцев. Кому надо, просто скачайте "GIF_PROBA.RAR", распакуйте и подключите к своему проекту, - далее добавьте:
| Код |
#include "GIFImage.hpp"
// В конструктор формы добавьте это:
TPicture::RegisterFileFormat(__classid(TGIFImage),"gif","Files GIF",
__classid(TGIFImage));
// В обработчик кнопки добавьте:
Image1->Picture->LoadFromFile("My.gif");
==================================
И наслождайтесь GIF картинкой
==================================
// А Так можно сохранять любое изображение в GIF файл:
TGIFImage* T= new TGIFImage();
T->Assign(Image1->Picture);
T->SaveToFile("My2.gif");
delete T;
|
|