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
Gif Animados
- Antonio Linares
- Site Admin
- Posts: 37481
- Joined: Thu Oct 06, 2005 5:47 pm
- Location: Spain
- Contact:
- Armando Picon
- Posts: 448
- Joined: Mon Dec 26, 2005 9:11 pm
- Location: Lima, Peru
Karinhakarinha wrote:http://www.fivewin.com.br/Dicas/602BORSHADE.ZIP
Dentro del Zip falta el archivo "Animabmp.ch". ¿Puedes conseguirmelo? Te agradecería Mucho.
Armando
email: apic1002002@yahoo.es
FWH + BCC582 + WorkShop 4.5 + Resource Hacker + Mingw
Mis nuevas herramientas
Comunicacion via WhatsApp (+51) 957549 665
Comunicación via Correo: apic1002002 at yahoo dot es; apic1002002@gmail.com
Mis nuevas herramientas
Comunicacion via WhatsApp (+51) 957549 665
Comunicación via Correo: apic1002002 at yahoo dot es; apic1002002@gmail.com
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
João Santos - São Paulo - Brasil
- Armando Picon
- Posts: 448
- Joined: Mon Dec 26, 2005 9:11 pm
- Location: Lima, Peru
Gracias Karinha... Muito obrigado !!!
FWH + BCC582 + WorkShop 4.5 + Resource Hacker + Mingw
Mis nuevas herramientas
Comunicacion via WhatsApp (+51) 957549 665
Comunicación via Correo: apic1002002 at yahoo dot es; apic1002002@gmail.com
Mis nuevas herramientas
Comunicacion via WhatsApp (+51) 957549 665
Comunicación via Correo: apic1002002 at yahoo dot es; apic1002002@gmail.com