Animated_Gif_Library

[wolf9228]

expandcollapse popup

#include <GuiConstantsEx.au3>
#include <WindowsConstants.au3>
Opt("OnExitFunc", "_Exit")
Global $DllOpen =  DllOpen("Animated_Gif_Library.dll")
$hGUI = GUICreate("GDI+", 600, 100)
GUISetState()

$hBitmap1 = GdipLoadImageFromFile( "world2.gif")
AnimatedGif( $hBitmap1 ,$hGUI, 0, 0)
$hBitmap2 = GdipLoadImageFromFile( "alladdin.gif")
AnimatedGif( $hBitmap2 ,$hGUI, 100, 0)
$hBitmap2 = GdipLoadImageFromFile( "clogo.gif")
AnimatedGif( $hBitmap2 ,$hGUI, 200, 0)
$hBitmap2 = GdipLoadImageFromFile( "elephnt2.gif")
AnimatedGif( $hBitmap2 ,$hGUI, 300, 0)
$hBitmap2 = GdipLoadImageFromFile( "Elephnt1.gif")
AnimatedGif( $hBitmap2 ,$hGUI, 400, 0)
 
Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE


Func GdipLoadImageFromFile( _
$filename = 0 , $image = 0  )

$DllCall = DllCall($DllOpen , "int:cdecl" , "GdipLoadImageFromFile" , _
"wstr" , $filename , "int*" , $image  )
Return SetError ( $DllCall[0], 0 , $DllCall[UBound($DllCall)- 1])
EndFunc

Func AnimatedGif( _
$hBitmap = 0 , $Whwnd = 0  , $X = 0 , $Y = 0 )

$DllCall = DllCall($DllOpen , "int:cdecl" , "AnimatedGif" , _
"hwnd" , $hBitmap, "hwnd" ,$Whwnd, "int" , $X , "int" , $Y )
Return SetError ( $DllCall[0], 0 , $DllCall[UBound($DllCall)- 1])
EndFunc


Func PauseAnimatedGif($hBitmap , $Bool)
$DllCall = DllCall($DllOpen , "int:cdecl" , "PauseAnimatedGif" , _
"hwnd" , $hBitmap, "int" ,$Bool)
Return SetError ( $DllCall[0], 0 , $DllCall[UBound($DllCall)- 1])
EndFunc

Func GplusShutdown()
$DllCall = DllCall($DllOpen , "int:cdecl" , "GplusShutdown")
Return SetError ( $DllCall[0], 0 , $DllCall[UBound($DllCall)- 1])
EndFunc

Func _Exit()
GplusShutdown()
DllClose($DllOpen)
EndFunc

Edited March 25, 2009 by wolf9228

[UEZ]

expandcollapse popup

#include <GuiConstantsEx.au3>
#include <WindowsConstants.au3>
Opt("OnExitFunc", "_Exit")
Global $DllOpen =  DllOpen("Animated_Gif_Library.dll")
$hGUI = GUICreate("GDI+", 600, 100)
GUISetState()

$hBitmap1 = GdipLoadImageFromFile( "world2.gif")
AnimatedGif( $hBitmap1 ,$hGUI, 0, 0)
$hBitmap2 = GdipLoadImageFromFile( "alladdin.gif")
AnimatedGif( $hBitmap2 ,$hGUI, 100, 0)
$hBitmap2 = GdipLoadImageFromFile( "clogo.gif")
AnimatedGif( $hBitmap2 ,$hGUI, 200, 0)
$hBitmap2 = GdipLoadImageFromFile( "elephnt2.gif")
AnimatedGif( $hBitmap2 ,$hGUI, 300, 0)
$hBitmap2 = GdipLoadImageFromFile( "Elephnt1.gif")
AnimatedGif( $hBitmap2 ,$hGUI, 400, 0)
 
Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE


Func GdipLoadImageFromFile( _
$filename = 0 , $image = 0  )

$DllCall = DllCall($DllOpen , "int:cdecl" , "GdipLoadImageFromFile" , _
"wstr" , $filename , "int*" , $image  )
Return SetError ( $DllCall[0], 0 , $DllCall[UBound($DllCall)- 1])
EndFunc

Func AnimatedGif( _
$hBitmap = 0 , $Whwnd = 0  , $X = 0 , $Y = 0 )

$DllCall = DllCall($DllOpen , "int:cdecl" , "AnimatedGif" , _
"hwnd" , $hBitmap, "hwnd" ,$Whwnd, "int" , $X , "int" , $Y )
Return SetError ( $DllCall[0], 0 , $DllCall[UBound($DllCall)- 1])
EndFunc


Func PauseAnimatedGif($hBitmap , $Bool)
$DllCall = DllCall($DllOpen , "int:cdecl" , "PauseAnimatedGif" , _
"hwnd" , $hBitmap, "int" ,$Bool)
Return SetError ( $DllCall[0], 0 , $DllCall[UBound($DllCall)- 1])
EndFunc

Func GplusShutdown()
$DllCall = DllCall($DllOpen , "int:cdecl" , "GplusShutdown")
Return SetError ( $DllCall[0], 0 , $DllCall[UBound($DllCall)- 1])
EndFunc

Func _Exit()
GplusShutdown()
DllClose($DllOpen)
EndFunc

When I try to run the script, AutoIT is crashing: !>13:11:02 AutoIT3.exe ended.rc:-1073741819

Btw, your are quite silent with the description of your work!

UEZ

[youknowwho4eva]

I didn't get any errors... No animated gifs, just stationary pics

[wolf9228]

When I try to run the script, AutoIT is crashing: !>13:11:02 AutoIT3.exe ended.rc:-1073741819

Btw, your are quite silent with the description of your work!

UEZ

http://translate.google.com/

I can not write in English

But I can understand the words written

Try this version of the library

Thank you

[wolf9228]

I didn't get any errors... No animated gifs, just stationary pics

Thank you

[UEZ]

http://translate.google.com/

I can not write in English

But I can understand the words written

Try this version of the library

Thank you

Same crash again:

>Running:(3.3.0.0):C:\Program Files\AutoIt3\autoit3.exe "D:\Coding\AU3\GFX\GDI\Animated GIF\Animated_Gif.au3"

!>21:00:28 AutoIT3.exe ended.rc:-1073741819

+>21:00:29 AutoIt3Wrapper Finished

>Exit code: -1073741819 Time: 4.098

UEZ

[gseller]

Works Great for me. Nice work! I know I will use it in many scripts. Thank You for sharing.

[yehia]

not animated for me ... strange

[UEZ]

Mmmmhhh, I'm using Vista x32 and AutoIt v3.3.0.0 and it is crashing when I'm starting it.

Strange, that I'm the only one with the crash ...

UEZ

Edited March 25, 2009 by UEZ

[Yashied]

Don`t work for me. (Windows XP SP2)

It is a pity.

Edited March 26, 2009 by Yashied

[youknowwho4eva]

Thank you

Is that the intended function? Just stationary pictures of the gifs?

[ptrex]

@wolf9228

Works fine for me XP and latest Beta.

Nice job !!

Regards

ptrex

[yehia]

i guess this dont work on xp sp2

[gseller]

Works fine for me on XP SP2..

[AlmarM]

It works for me, nice!

AlmarM

[ProgAndy]

doesn't work for me (XP SP3+VistMizer): just static images and invisible after i minimized the window.

Edited March 28, 2009 by ProgAndy