1
« en: Domingo 27 de Enero de 2008, 05:23 »
puedes descomponer tu archivo gif en sus diferentes frames (con un programa editor de gifs) y convertirlos en mapa de bits de ahi con un timmer los puedes cargar secuencialmente para verlos sobre un Timage . espero te sirva ,
void __fastcall TForm1::Timer1Timer(TObject *Sender)
{ Graphics::TBitmap *Bitmap1 = new Graphics::TBitmap();
if(a==2)a=0;
if(a==0) {
Bitmap1->LoadFromFile("figura1.bmp");
Image1->Picture->Graphic = Bitmap1;
}
if(a==1)
{
Bitmap1->LoadFromFile("figura2.bmp");
Image1->Picture->Graphic = Bitmap1;
}
a++;
}