VPF::Анимация вывод на форму - Форум программистов

Simon14

Дата 28.2.2009, 18:51 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 157
Регистрация: 15.1.2009

Репутация: нет
Всего: нет

Всем привет не подскажите как и спомошью какого компонента можно вывести на форму анимацию разширения gif. Зарание спасибо

artsb

Дата 28.2.2009, 19:24 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 2280
Регистрация: 17.7.2007
Где: центр Вселенной

Репутация: 39
Всего: 64

Насколько я помню (хотя может и не прав), в библиотеке RxLib есть то, что вам нужно.

Это сообщение отредактировал(а) artsb - 28.2.2009, 19:27

--------------------

Чем отличается умный человек от мудрого?
Умный - выпутается из любой ситуации.
Мудрый - просто в неё не попадёт.

Dmi3ev

Дата 28.2.2009, 20:54 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 1698
Регистрация: 28.11.2007

Репутация: 16
Всего: 41

самый простой вариант: через CppWebBrowser

Код


CppWebBrowser1->Navigate(L"D:\\1.gif");

или регистрировать формат, врать не буду, не помню,но что-то типа:
http://www.cyberguru.ru/programming/cpp-bu...faq-page20.html

--------------------

Simon14

Дата 28.2.2009, 21:49 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 157
Регистрация: 15.1.2009

Репутация: нет
Всего: нет

можноли по подробней ато непонять

SVN74

Дата 28.2.2009, 23:11 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 740
Регистрация: 5.5.2008
Где: Комсомольск на Дн епре

Репутация: 11
Всего: 18

Вот примерчик для C++Builder 2009

Код


#include <vcl.h>
#pragma hdrstop

#include "GIF_PROBA.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm3 *Form3;

//---------------------------------------------------------------------------
__fastcall TForm3::TForm3(TComponent* Owner)
    : TForm(Owner)
{
   T= new TGIFImage();
   T->LoadFromFile(L"048.gif");
   ImageCount = T->Images->Count;
   Index = 0;
   rect=Image->Canvas->ClipRect;

   DC= GetDC(Handle);
   DC1 = GetDC(Memo1->Handle);
}
//---------------------------------------------------------------------------
void __fastcall TForm3::Timer1Timer(TObject *Sender)
{
  if(Index>ImageCount-1)Index=0;


     TextOut(DC,10,30,"IYUOYUYUIYUIYUIY",16);
     T->Images->Frames[Index]->Draw(Image->Canvas,rect,0,0);
     Image->Refresh();

     BitBlt(DC1,10,10,170,140,
     T->Images->Frames[Index]->Bitmap->Canvas->Handle,
     0,0,SRCCOPY);

   Index++;
}
//---------------------------------------------------------------------------

void __fastcall TForm3::FormDestroy(TObject *Sender)
{
   delete T;
}
//---------------------------------------------------------------------------

//---------------------------------------------------------------------------

#ifndef GIF_PROBAH
#define GIF_PROBAH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <Buttons.hpp>
#include <ExtCtrls.hpp>
#include <ComCtrls.hpp>
#include <ImgList.hpp>
#include <Menus.hpp>
#include <GIFImg.hpp>
#include <Dialogs.hpp>
#include <ExtDlgs.hpp>
//---------------------------------------------------------------------------
class TForm3 : public TForm
{
__published:    // IDE-managed Components
    TImage *Image;
    TTimer *Timer1;
    TMemo *Memo1;
    void __fastcall Timer1Timer(TObject *Sender);
    void __fastcall FormDestroy(TObject *Sender);
private:    // User declarations
        TGIFImage *T;
        int ImageCount,Index;
        TRect rect;
        HDC DC1,DC;
public:        // User declarations
    __fastcall TForm3(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TForm3 *Form3;
//---------------------------------------------------------------------------
#endif

Dmi3ev

Дата 28.2.2009, 23:53 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 1698
Регистрация: 28.11.2007

Репутация: 16
Всего: 41

Цитата

можноли по подробней ато непонять

что подробнее? Кидай на форму CppWebBrowser а потом в проге пиши

Код


CppWebBrowser1->Navigate(L"D:\\1.gif");

проще способа нет...

SVN74, по-моему в шестерке такое не проканает... (не в смылсе синтаксиса, а в смысле способ такой не пройдет там)

--------------------

mrbrooks

Дата 2.3.2009, 09:17 (ссылка)

(нет голосов)

Загрузка ...

трололомен

Профиль
Группа: Завсегдатай
Сообщений: 4259
Регистрация: 4.10.2006
Где: Дол Гулдур

Репутация: 167
Всего: 306

Simon14, какая версия Бормана? В 2009 TImage , к примеру, работает с gif.

Simon14

Дата 27.3.2009, 14:08 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 157
Регистрация: 15.1.2009

Репутация: нет
Всего: нет

Цитата(mrbrooks @ 2.3.2009, 09:17)

Simon14, какая версия Бормана? В 2009 TImage , к примеру, работает с gif.

Borland C++ Builder 6

Добавлено через 1 минуту и 6 секунд
Dmi3ev Спасибо ваш вариант работает

Anikmar

Дата 27.3.2009, 15:17 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 2513
Регистрация: 26.11.2006
Где: Санкт-Петербург

Репутация: 34
Всего: 59

Несколько дней назад буквально была тема про это.

Klin

Дата 27.3.2009, 17:36 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Участник Клуба
Сообщений: 1938
Регистрация: 7.10.2002
Где: Краснодар

Репутация: 20
Всего: 25

Мда... этот вопрос насколько помню, поднимался еще, когда я только на форум пришел. Действительно в последней версии билдера гифко находит реализацию в TImage. Господа, через браузер - это конечно легко, но использовать всю эту махину, чтобы воспроизвести маленький гиф файл... это вы загнули. Если хотите оспорить, этот момент, сразу вспомните, о том, что gif будет находиться вне программы. А способ добавления его в ресурсы и дальнейшего извлечения... не той дорогой идем товарсчи.

Есть старый и добрый RxLib - это занимательная библиотека. Если в поисковике форума забьете, может даже, рабочую ссылку найдете. Там есть компонент TRxGifAnimator (насколько помню), выглядит, так же как и TImage, но реализован специально для gif. На мой взгляд - это самый рациональный способ.

Мне жаль, что на форуме пропал старый добрый FAQ, который заполняли сами пользователи, туда и я забивал многое, о чем спрашивали за последнее время. Нет, я знаю, что винградовский FAQ существует и сейчас, но имхо туда мало кто из новичков заходит. Понимаю полный оффтоп, последнего абзаца, но мне действительно жаль, что задумка с самостоятельным FAQ пропала во времени.

--------------------

Я человек - попробуйте обвинить меня за это.

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| C++ Builder \| Следующая тема »