FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour Animated GIFs
Posts: 437
Joined: Fri Oct 07, 2005 12:56 PM
Animated GIFs
Posted: Wed Oct 11, 2006 07:58 AM

Hi !

Maybe you know how to display Animated GIF ? With FreeImg lib ? Or can you direct to freeware OCX for that ?

Many thanks in advance !

Rimantas U.
Posts: 3107
Joined: Fri Oct 07, 2005 06:28 PM
Animated GIFs
Posted: Wed Oct 11, 2006 09:33 AM

use gif98 class
you can found it on this forum ( Utilities)

Best Regards, Saludos



Falconi Silvio
Posts: 437
Joined: Fri Oct 07, 2005 12:56 PM
Animated GIFs
Posted: Wed Oct 11, 2006 10:23 AM
Silvio wrote:use gif98 class
you can found it on this forum ( Utilities)


Silvio , reviewed Utiities , but didn't found GIF assiocated or similar post . Maybe you have this class ? Can you send me directly ?

With best regards !
Rimantas U.
Posts: 437
Joined: Fri Oct 07, 2005 12:56 PM
Animated GIFs
Posted: Wed Oct 11, 2006 10:26 AM
Rimantas wrote:
Silvio wrote:use gif98 class
you can found it on this forum ( Utilities)


Silvio , reviewed Utiities , but didn't found GIF assiocated or similar post . Maybe you have this class ? Can you send me directly ?

With best regards !


I found it - Lozada-LLinas, Class TGif89 - . Something was with my eyes :-)) .

Regards !
Rimantas U.
Posts: 437
Joined: Fri Oct 07, 2005 12:56 PM
Animated GIFs
Posted: Wed Oct 11, 2006 10:36 AM
Silvio wrote:use gif98 class
you can found it on this forum ( Utilities)


Silvio , in this class exist acronim "BYNAME" . And harbour compiler don't recognize this . Can you advice with which I can change this ?

Regards !
Rimantas U.
Posts: 44162
Joined: Thu Oct 06, 2005 05:47 PM
Animated GIFs
Posted: Wed Oct 11, 2006 10:46 AM
Rimantas,
#xtranslate BYNAME <V> [, <VN> ]     => ::<V> := <V> [; ::<VN> := <VN> ]
#xtranslate BYNAME <V> DEFAULT <Val> => ::<V> := BYDEFAULT <V>, <Val>
#xtranslate BYNAME <V> IFNONIL       => ;
                            if <V> != NIL ;;
                                ::<V> := <V> ;;
                            end
#xtranslate BYDEFAULT <V>, <Val>     => if( <V> == NIL, <Val>, <V> )
regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 437
Joined: Fri Oct 07, 2005 12:56 PM
Animated GIFs
Posted: Wed Oct 11, 2006 10:57 AM
Antonio Linares wrote:Rimantas,
#xtranslate BYNAME <V> [, <VN> ]     => ::<V> := <V> [; ::<VN> := <VN> ]
#xtranslate BYNAME <V> DEFAULT <Val> => ::<V> := BYDEFAULT <V>, <Val>
#xtranslate BYNAME <V> IFNONIL       => ;
                            if <V> != NIL ;;
                                ::<V> := <V> ;;
                            end
#xtranslate BYDEFAULT <V>, <Val>     => if( <V> == NIL, <Val>, <V> )


Found this ClipX site , but was not ensured that this will be good ... :-)) . Thanks , Antonio !
Rimantas U.
Posts: 437
Joined: Fri Oct 07, 2005 12:56 PM
Animated GIFs
Posted: Wed Oct 11, 2006 12:38 PM
Antonio Linares wrote:Rimantas,
#xtranslate BYNAME <V> [, <VN> ]     => ::<V> := <V> [; ::<VN> := <VN> ]
#xtranslate BYNAME <V> DEFAULT <Val> => ::<V> := BYDEFAULT <V>, <Val>
#xtranslate BYNAME <V> IFNONIL       => ;
                            if <V> != NIL ;;
                                ::<V> := <V> ;;
                            end
#xtranslate BYDEFAULT <V>, <Val>     => if( <V> == NIL, <Val>, <V> )


Antonio ,

This old TGif89 class is adopted to Clipper+FW . And now when I created applic. from samples of this class on runtime I get an error :

   Error description: Error BASE/1004  Class: 'NIL' has no exported method: ACONTROLS
   Args:
   Called from ACONTROLS(0)
   Called from STARTGIFS(78)


Can you help in this situation ?

Regards !
Rimantas U.

Continue the discussion