Page 1 of 1
Gif Animados
Posted: Tue Jun 20, 2006 4:06 pm
by caducca
Hola Foro:
Quisiera usar gif animados en xHarbour, por ejemplo como usa el Verce cuando esta generando la aplicacion. Que clase debo usar ? Y si es posible algun ejemplo. Gracias
Posted: Tue Jun 20, 2006 10:31 pm
by Antonio Linares
De momento no tenemos soporte para GIFs animados. Una alternativa es usar AVIs. Puedes revisar samples\copyfile.prg
Posted: Tue Jun 20, 2006 10:51 pm
by karinha
Posted: Tue Jun 20, 2006 10:54 pm
by karinha
Posted: Mon Sep 22, 2008 8:45 pm
by Armando Picon
Karinha
Dentro del Zip falta el archivo "Animabmp.ch". ¿Puedes conseguirmelo? Te agradecería Mucho.
Armando
email:
apic1002002@yahoo.es
Posted: Tue Sep 23, 2008 12:03 pm
by karinha
Code: Select all
//--------------------------------------------------------------------------//
// ANIMABMP.CH - Comandos para a classe TAnimaBmpmp
//--------------------------------------------------------------------------//
#ifndef TAnimaBmpMP_CH
#define TAnimaBmpMP_CH
#xcommand @ <nRow>, <nCol> ANIMABMP [ <oAni> ] ;
[ <bmp: NAME, RESOURCE, FILENAME> <cBitmap> ] ;
[ SIZE <nWidth>, <nHeight> ] ;
[ GLIPS <nGlips> ] ;
[ SPEED <nSpeed> ] ;
[ <of: OF, WINDOW, DIALOG> <oWnd> ] ;
=> ;
[ <oAni> := ] TAnimaBmp():New( <nRow>, <nCol>, <nWidth>, <nHeight>,;
<cBitmap>, <nGlips>, <nSpeed>, <oWnd> )
#xcommand REDEFINE ANIMABMP [ <oAni> ] ;
[ <bmp: NAME, RESOURCE, FILENAME> <cBitmap> ] ;
[ ID <nId> ] ;
[ GLIPS <nGlips> ] ;
[ SPEED <nSpeed> ] ;
[ <of: OF, WINDOW, DIALOG> <oWnd> ] ;
[ <lTransparent: TRANSPARENT> ] ; //Modifiquei 31/08/2007
=> ;
[ <oAni> := ] TAnimaBmp():ReDefine( <oWnd>, <nId>, <cBitmap>,;
<nGlips>, <nSpeed> )
#endif
Regards, saludos
Posted: Tue Sep 23, 2008 2:53 pm
by Armando Picon
Gracias Karinha... Muito obrigado !!!