مشکل در نمایش گیف

[SoRoUsH 300]

سلام دوستان من با کتابخانه GifDecoder کار میکنم و میخوام 5 تا فایل گیف رو نمایش بدم...به این صورت که مثلا یه ایمیج ویو باشه با دوتا دکمه قبلی و بعدی ، که یه گیف توی ایمیج ویو نمایش داده بشه و وقتی روی دکمه ها کلیک شد گیف قبلی/بعدی رو نشون بده! من تقریبا این رو ساختم ولی یه مشکلی داره...گیف اولی مشکلی نداره اما وقتی روی دکمه ها کلیک میکنم و گیف عوض میشه ، گیف های بعدیش اینطوری پخش میشه: یه بار گیف رو نشون میده ، یه صحه سفید میاد دوباره یبار نشون میده دوباره یه صفجه صفید میاد در حالی که همونطور که گفتم توی گیف اولی این مشکل صفحه سفید نیست! فکر میکنم مشکل از کد های تایمرم باشه(مطمعن نیستم!) اینا هم کد هام هست:

Sub Globals
Dim g As GifDecoder
Private Button1,Button2 As Button
Dim t As Timer
Dim count,i As Int
Private ImageView1 As ImageView
Dim img As Int 
End Sub

Sub Activity_Create(FirstTime As Boolean)
Activity.LoadLayout("varzesh")
img=1
File.Copy(File.DirAssets,img&".gif",File.DirInternal,img&".gif")
t.Initialize("timer",200)
t.Enabled=True
i=0
g.load(File.DirInternal,img&".gif")
count=g.FrameCount
End Sub

Sub Button1_Click
	'+
	If img=5 Then
	img=1
	File.Copy(File.DirAssets,img&".gif",File.DirInternal,img&".gif")
	g.load(File.DirInternal,img+".gif")
	Else
	img=img+1
	File.Copy(File.DirAssets,img&".gif",File.DirInternal,img&".gif")
	g.load(File.DirInternal,img&".gif")
	End If
	
End Sub

Sub Button2_Click
	'-
	If img=1 Then
	img=5
	File.Copy(File.DirAssets,img&".gif",File.DirInternal,img&".gif")
	g.load(File.DirInternal,img&".gif")
	Else
	img=img-1
	File.Copy(File.DirAssets,img&".gif",File.DirInternal,img&".gif")
	g.load(File.DirInternal,img&".gif")
	End If
End Sub

Sub timer_Tick
	ImageView1.SetBackgroundImage(g.Frame(i))
	i=i+1
	If i = count Then
		i=0
	End If
	
End Sub